From 88bfec0cf55f8c9ad74881d48cf8756c9fe627aa Mon Sep 17 00:00:00 2001 From: Herbert Valerio Riedel <hvr@gnu.org> Date: Thu, 7 Nov 2013 10:21:17 +0100 Subject: [PATCH] Temporary workaround for addressing #7359 Signed-off-by: Herbert Valerio Riedel <hvr@gnu.org> --- System/Posix/Signals.hsc | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/System/Posix/Signals.hsc b/System/Posix/Signals.hsc index eb46ba4..4b5321e 100644 --- a/System/Posix/Signals.hsc +++ b/System/Posix/Signals.hsc @@ -616,6 +616,17 @@ foreign import ccall unsafe "sigfillset" foreign import ccall unsafe "sigismember" c_sigismember :: Ptr CSigset -> CInt -> IO CInt +#elif defined(darwin_HOST_OS) && __GLASGOW_HASKELL__ < 706 +-- see http://ghc.haskell.org/trac/ghc/ticket/7359#comment:3 +-- To be removed when support for GHC 7.4.x is dropped +foreign import ccall unsafe "__hscore_sigdelset" + c_sigdelset :: Ptr CSigset -> CInt -> IO CInt + +foreign import ccall unsafe "__hscore_sigfillset" + c_sigfillset :: Ptr CSigset -> IO CInt + +foreign import ccall unsafe "__hscore_sigismember" + c_sigismember :: Ptr CSigset -> CInt -> IO CInt #else foreign import capi unsafe "signal.h sigdelset" c_sigdelset :: Ptr CSigset -> CInt -> IO CInt -- GitLab