diff options
| author | Ben.Lippmeier@anu.edu.au <unknown> | 2009-11-23 05:15:10 +0000 |
|---|---|---|
| committer | Ben.Lippmeier@anu.edu.au <unknown> | 2009-11-23 05:15:10 +0000 |
| commit | 3ad5c4bbe8b3f40a2a105722c7c1b0abb0c99c66 (patch) | |
| tree | b877423b7fc06d56537f160f1769ba7421a144af /rts/Sparks.c | |
| parent | cd24d61675e2f5c9145efcac62f64347789e583c (diff) | |
| download | haskell-3ad5c4bbe8b3f40a2a105722c7c1b0abb0c99c66.tar.gz | |
Windows DLLs: use DLL aware runSparks_closure instead of base_GHCziConc_runSparks_closure directly
Diffstat (limited to 'rts/Sparks.c')
| -rw-r--r-- | rts/Sparks.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Sparks.c b/rts/Sparks.c index e5e6d7e955..3911ae9e0b 100644 --- a/rts/Sparks.c +++ b/rts/Sparks.c @@ -45,7 +45,7 @@ createSparkThread (Capability *cap) StgTSO *tso; tso = createIOThread (cap, RtsFlags.GcFlags.initialStkSize, - &base_GHCziConc_runSparks_closure); + (StgClosure *)runSparks_closure); traceEventCreateSparkThread(cap, tso->id); |