diff options
| author | simonmar <unknown> | 2004-10-11 10:54:57 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2004-10-11 10:54:57 +0000 |
| commit | 0688d49ec633cb4274690de2556638fae1145dc6 (patch) | |
| tree | f7b78c66fbdb93dd7b57b223ab59f0787841379b /ghc | |
| parent | c73f13cf006a7d6fce23e3adaa9a3c787ee1cfda (diff) | |
| download | haskell-0688d49ec633cb4274690de2556638fae1145dc6.tar.gz | |
[project @ 2004-10-11 10:54:57 by simonmar]
genericRaise() hack needed on FreeBSD too.
Diffstat (limited to 'ghc')
| -rw-r--r-- | ghc/rts/RtsUtils.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ghc/rts/RtsUtils.c b/ghc/rts/RtsUtils.c index 636eff77fb..09154da45a 100644 --- a/ghc/rts/RtsUtils.c +++ b/ghc/rts/RtsUtils.c @@ -297,14 +297,14 @@ heapCheckFail( void ) #endif /* - * It seems that pthreads and signals interact oddly in OpenBSD - * pthreads (and possibly FreeBSD). When linking with -lpthreads, we + * It seems that pthreads and signals interact oddly in OpenBSD & FreeBSD + * pthreads (and possibly others). When linking with -lpthreads, we * have to use pthread_kill to send blockable signals. So use that * when we have a threaded rts. So System.Posix.Signals will call * genericRaise(), rather than raise(3). */ int genericRaise(int sig) { -#if defined(THREADED_RTS) && defined(openbsd_TARGET_OS) +#if defined(THREADED_RTS) && (defined(openbsd_TARGET_OS) || defined(freebsd_TARGET_OS)) return pthread_kill(pthread_self(), sig); #else return raise(sig); |