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

Commiteed64d0

Browse files
committed
FX_NO_EXCEPTIONDISPATCHINFO -- dead code
1 parent82a2c85 commiteed64d0

File tree

2 files changed

+3
-18
lines changed

2 files changed

+3
-18
lines changed

‎src/fsharp/FSharp.Core/control.fs‎

Lines changed: 3 additions & 14 deletions
Original file line numberDiff line numberDiff line change
@@ -14,7 +14,9 @@ namespace Microsoft.FSharp.Control
1414
openSystem.Diagnostics.CodeAnalysis
1515
openSystem.IO
1616
openSystem.Reflection
17+
openSystem.Runtime.ExceptionServices
1718
openSystem.Threading
19+
openSystem.Threading.Tasks
1820
openMicrosoft.FSharp.Core
1921
openMicrosoft.FSharp.Core.LanguagePrimitives.IntrinsicOperators
2022
openMicrosoft.FSharp.Core.Operators
@@ -25,27 +27,14 @@ namespace Microsoft.FSharp.Control
2527
openReflectionAdapters
2628
#endif
2729

28-
openSystem.Threading
29-
openSystem.Threading.Tasks
30+
3031

3132
#if FX_NO_OPERATION_CANCELLED
3233
typeOperationCanceledException(s: System.String)=
3334
inherit System.Exception(s)
3435
new()=new OperationCanceledException("The operation has been canceled")
3536
#endif
3637

37-
38-
#if FX_NO_EXCEPTIONDISPATCHINFO
39-
[<AllowNullLiteral>]
40-
typeExceptionDispatchInfo(exn: System.Exception)=
41-
static memberCapture(exn)= ExceptionDispatchInfo(exn)
42-
member__.Throw()= raise exn;()
43-
member__.SourceException= exn
44-
#else
45-
openSystem.Runtime.ExceptionServices
46-
#endif
47-
48-
4938
/// We use our own internal implementation of queues to avoid a dependency on System.dll
5039
typeQueue<'T>()=//: IEnumerable<T>, ICollection, IEnumerable
5140

‎tests/fsharp/core/control/test.fsx‎

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1992,8 +1992,6 @@ module ExceptionInAsyncParallelOrHowToInvokeContinuationTwice =
19921992

19931993
check"ExceptionInAsyncParallelOrHowToInvokeContinuationTwice"(Seq.init30(ignore>> test)|> Seq.forall id)true
19941994

1995-
#if!FX_NO_EXCEPTIONDISPATCHINFO
1996-
19971995
// [Asyncs] Better stack traces for Async
19981996
module BetterStacksTest1=
19991997

@@ -2033,8 +2031,6 @@ module BetterStacksTest2 =
20332031

20342032
test"BetterStacks2"(v.Contains("FunctionRaisingException"))
20352033

2036-
#endif
2037-
20382034
// [Asyncs] Cancellation inside Async.AwaitWaitHandle may release source WaitHandle
20392035
module Bug391710=
20402036
open System

0 commit comments

Comments
 (0)

[8]ページ先頭

©2009-2025 Movatter.jp