diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2007-08-29 10:48:11 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2007-08-29 10:48:11 +0000 |
| commit | b09ab92b65983635c68c8944631b1d53e9b71e42 (patch) | |
| tree | bf0e6f512ca4431f0963bf99bcd9c1c68dabb92f /rts/HeapStackCheck.cmm | |
| parent | 7605f65c7665bf1f58438d4eaf0ce9d56878a1c0 (diff) | |
| download | haskell-b09ab92b65983635c68c8944631b1d53e9b71e42.tar.gz | |
Windows: remove the {Enter,Leave}CricialSection wrappers
The C-- parser was missing the "stdcall" calling convention for
foreign calls, but once added we can call {Enter,Leave}CricialSection
directly.
Diffstat (limited to 'rts/HeapStackCheck.cmm')
| -rw-r--r-- | rts/HeapStackCheck.cmm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/HeapStackCheck.cmm b/rts/HeapStackCheck.cmm index a4fb5c0a16..753e6718e7 100644 --- a/rts/HeapStackCheck.cmm +++ b/rts/HeapStackCheck.cmm @@ -873,7 +873,7 @@ stg_block_blackhole_finally // The last thing we do is release sched_lock, which is // preventing other threads from accessing blackhole_queue and // picking up this thread before we are finished with it. - foreign "C" RELEASE_LOCK(sched_mutex "ptr"); + RELEASE_LOCK(sched_mutex "ptr"); #endif jump StgReturn; } |