Movatterモバイル変換


[0]ホーム

URL:


Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

Sign up
Appearance settings

Commite41a462

Browse files
dsymedsyme
dsyme
authored and
dsyme
committed
fix default SVT reference
1 parent763a0ff commite41a462

File tree

1 file changed

+13
-3
lines changed

1 file changed

+13
-3
lines changed

‎src/fsharp/CompileOps.fs‎

Lines changed: 13 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1618,8 +1618,16 @@ let OutputDiagnosticContext prefix fileLineFn os err =
16181618
letGetFSharpCoreLibraryName()="FSharp.Core"
16191619

16201620
// If necessary assume a reference to the latest .NET Framework FSharp.Core with which those tools are built.
1621-
letGetDefaultFSharpCoreReference()=
1622-
typeof<list<int>>.Assembly.Location
1621+
letGetDefaultFSharpCoreReference()= typeof<list<int>>.Assembly.Location
1622+
1623+
// If necessary assume a reference to the latest System.ValueTuple with which those tools are built.
1624+
letGetDefaultSystemValueTupleReference()=
1625+
try
1626+
letasm= typeof<System.ValueTuple<int,int>>.Assembly
1627+
if asm.FullName.StartsWith"System.ValueTuple"then
1628+
Some asm.Location
1629+
else None
1630+
with_-> None
16231631

16241632
letGetFsiLibraryName()="FSharp.Compiler.Interactive.Settings"
16251633

@@ -1654,7 +1662,9 @@ let DefaultReferencesForScriptsAndOutOfProjectSources(assumeDotNetFramework) =
16541662
yield"System.Runtime.Numerics"// BigInteger
16551663
yield"System.Threading"// OperationCanceledException
16561664
// always include a default reference to System.ValueTuple.dll in scripts and out-of-project sources
1657-
yield"System.ValueTuple"
1665+
match GetDefaultSystemValueTupleReference()with
1666+
| None->()
1667+
| Some v->yield v
16581668

16591669
yield"System.Web"
16601670
yield"System.Web.Services"

0 commit comments

Comments
 (0)

[8]ページ先頭

©2009-2025 Movatter.jp