aboutsummaryrefslogtreecommitdiffhomepage
path: root/System
diff options
context:
space:
mode:
authorGravatar Herbert Valerio Riedel <hvr@gnu.org>2013-11-07 10:21:17 +0100
committerGravatar Herbert Valerio Riedel <hvr@gnu.org>2013-11-07 10:21:17 +0100
commit88bfec0cf55f8c9ad74881d48cf8756c9fe627aa (patch)
tree2c57b792f6fd4b50f96b044a7036e8617837c84d /System
parent10dbdce2826290e9d7b81e9963cccd03b8aa3678 (diff)
Temporary workaround for addressing #7359
Signed-off-by: Herbert Valerio Riedel <hvr@gnu.org>
Diffstat (limited to 'System')
-rw-r--r--System/Posix/Signals.hsc11
1 files changed, 11 insertions, 0 deletions
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