[project @ 2004-10-11 10:54:57 by simonmar]

genericRaise() hack needed on FreeBSD too.

diff --git a/System/Posix/Signals.hsc b/System/Posix/Signals.hsc
index ee40238..3585ddb 100644 (file)
--- a/System/Posix/Signals.hsc
+++ b/System/Posix/Signals.hsc
@@ -287,7 +287,7 @@ foreign import ccall unsafe "killpg"
 raiseSignal :: Signal -> IO ()
 raiseSignal sig = throwErrnoIfMinus1_ "raiseSignal" (c_raise sig)
 
-#if defined(__GLASGOW_HASKELL__) && defined(openbsd_TARGET_OS)
+#if defined(__GLASGOW_HASKELL__) && (defined(openbsd_TARGET_OS) || defined(freebsd_TARGET_OS))
 foreign import ccall unsafe "genericRaise"
   c_raise :: CInt -> IO CInt
 #else