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

Commitda3f0b4

Browse files
committed
FX_NO_THREAD_STATIC --deadcode removal
1 parent009ef4a commitda3f0b4

File tree

2 files changed

+1
-14
lines changed

2 files changed

+1
-14
lines changed

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

Lines changed: 1 addition & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -113,18 +113,13 @@ namespace Microsoft.FSharp.Control
113113

114114
[<Literal>]
115115
static letbindLimitBeforeHijack=300
116-
#if!FX_NO_THREAD_STATIC
116+
117117
[<ThreadStatic>]
118118
[<DefaultValue>]
119119
static val mutableprivatethisThreadHasTrampoline:bool
120-
#endif
121120

122121
static memberThisThreadHasTrampoline=
123-
#if FX_NO_THREAD_STATIC
124-
true
125-
#else
126122
Trampoline.thisThreadHasTrampoline
127-
#endif
128123

129124
let mutablecont= None
130125
let mutablebindCount=0
@@ -140,23 +135,17 @@ namespace Microsoft.FSharp.Control
140135
| Some newAction->
141136
cont<- None
142137
loop newAction
143-
#if!FX_NO_THREAD_STATIC
144138
letthisIsTopTrampoline=
145139
if Trampoline.thisThreadHasTrampolinethen
146140
false
147141
else
148142
Trampoline.thisThreadHasTrampoline<-true
149143
true
150-
#endif
151144
try
152145
loop firstAction
153146
finally
154-
#if FX_NO_THREAD_STATIC
155-
()
156-
#else
157147
if thisIsTopTrampolinethen
158148
Trampoline.thisThreadHasTrampoline<-false
159-
#endif
160149
FakeUnit
161150

162151
// returns true if time to jump on trampoline

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

Lines changed: 0 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1262,9 +1262,7 @@ module internal PrintfImpl =
12621262
static letget(key:string)= map.GetOrAdd(key, getOrAddFunc)
12631263

12641264
[<DefaultValue>]
1265-
#if!FX_NO_THREAD_STATIC
12661265
[<ThreadStatic>]
1267-
#endif
12681266
static val mutableprivatelast:string* CachedItem<'T, 'State, 'Residue, 'Result>
12691267
12701268
static member Get(key: Format<'T, 'State, 'Residue, 'Result>)=

0 commit comments

Comments
 (0)

[8]ページ先頭

©2009-2025 Movatter.jp