diff options
-rw-r--r-- | System/Posix/Signals.hsc | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/System/Posix/Signals.hsc b/System/Posix/Signals.hsc index 463dfc7..91e642f 100644 --- a/System/Posix/Signals.hsc +++ b/System/Posix/Signals.hsc @@ -598,7 +598,7 @@ awaitSignal maybe_sigset = do -- XXX My manpage says it can also return EFAULT. And why is ignoring -- EINTR the right thing to do? -foreign import capi unsafe "HsUnix.h sigsuspend" +foreign import ccall unsafe "sigsuspend" c_sigsuspend :: Ptr CSigset -> IO CInt #endif @@ -612,16 +612,16 @@ foreign import ccall unsafe "sigfillset" foreign import ccall unsafe "sigismember" c_sigismember :: Ptr CSigset -> CInt -> IO CInt #else -foreign import capi unsafe "HsUnix.h sigdelset" +foreign import ccall unsafe "__hscore_sigdelset" c_sigdelset :: Ptr CSigset -> CInt -> IO CInt -foreign import capi unsafe "HsUnix.h sigfillset" +foreign import ccall unsafe "__hscore_sigfillset" c_sigfillset :: Ptr CSigset -> IO CInt -foreign import capi unsafe "HsUnix.h sigismember" +foreign import ccall unsafe "__hscore_sigismember" c_sigismember :: Ptr CSigset -> CInt -> IO CInt #endif /* __HUGS__ */ -foreign import capi unsafe "HsUnix.h sigpending" +foreign import ccall unsafe "sigpending" c_sigpending :: Ptr CSigset -> IO CInt |