diff options
author | Simon Marlow <simonmar@microsoft.com> | 2007-09-04 14:28:53 +0000 |
---|---|---|
committer | Simon Marlow <simonmar@microsoft.com> | 2007-09-04 14:28:53 +0000 |
commit | 0981e24e9980b8b26e6f20fc56bebc1c7416cc4f (patch) | |
tree | 32e71877b4ce56a24e1ade784f1ebcbd9c436822 /rts | |
parent | 0f8ecdcd05627848c9eaea6c9d5e88e10e7ec78d (diff) | |
download | haskell-0981e24e9980b8b26e6f20fc56bebc1c7416cc4f.tar.gz |
put the @N suffix on stdcall foreign calls in .cmm code
This applies to EnterCriticalSection and LeaveCriticalSection in the RTS
Diffstat (limited to 'rts')
-rw-r--r-- | rts/HeapStackCheck.cmm | 2 | ||||
-rw-r--r-- | rts/PrimOps.cmm | 2 | ||||
-rw-r--r-- | rts/StgMiscClosures.cmm | 2 |
3 files changed, 6 insertions, 0 deletions
diff --git a/rts/HeapStackCheck.cmm b/rts/HeapStackCheck.cmm index 753e6718e7..11af7c7073 100644 --- a/rts/HeapStackCheck.cmm +++ b/rts/HeapStackCheck.cmm @@ -13,6 +13,8 @@ #include "Cmm.h" #ifdef __PIC__ +import EnterCriticalSection +import LeaveCriticalSection import pthread_mutex_unlock; #endif diff --git a/rts/PrimOps.cmm b/rts/PrimOps.cmm index d465709617..805e1a497b 100644 --- a/rts/PrimOps.cmm +++ b/rts/PrimOps.cmm @@ -47,6 +47,8 @@ import __gmpz_com; import base_GHCziIOBase_NestedAtomically_closure; import pthread_mutex_lock; import pthread_mutex_unlock; +import EnterCriticalSection +import LeaveCriticalSection #endif /*----------------------------------------------------------------------------- diff --git a/rts/StgMiscClosures.cmm b/rts/StgMiscClosures.cmm index 43efa784a0..afd302aeff 100644 --- a/rts/StgMiscClosures.cmm +++ b/rts/StgMiscClosures.cmm @@ -14,6 +14,8 @@ #ifdef __PIC__ import pthread_mutex_lock; +import EnterCriticalSection +import LeaveCriticalSection import base_GHCziBase_Czh_static_info; import base_GHCziBase_Izh_static_info; #endif |