[commit: ghc] master: Use pthread_kill on OS X too (3f90064)
Ian Lynagh
igloo at earth.li
Fri Jan 18 00:27:07 CET 2013
Repository : ssh://darcs.haskell.org//srv/darcs/ghc
On branch : master
http://hackage.haskell.org/trac/ghc/changeset/3f90064feff183aaa744db87704772874e6dc249
>---------------------------------------------------------------
commit 3f90064feff183aaa744db87704772874e6dc249
Author: Ian Lynagh <ian at well-typed.com>
Date: Thu Jan 17 19:23:17 2013 +0000
Use pthread_kill on OS X too
Fixes signals004(threaded1,threaded2) on OS X 32.
>---------------------------------------------------------------
rts/RtsUtils.c | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/rts/RtsUtils.c b/rts/RtsUtils.c
index 4d6d362..fcbb757 100644
--- a/rts/RtsUtils.c
+++ b/rts/RtsUtils.c
@@ -272,7 +272,7 @@ heapCheckFail( void )
* genericRaise(), rather than raise(3).
*/
int genericRaise(int sig) {
-#if defined(THREADED_RTS) && (defined(openbsd_HOST_OS) || defined(freebsd_HOST_OS) || defined(dragonfly_HOST_OS) || defined(netbsd_HOST_OS))
+#if defined(THREADED_RTS) && (defined(openbsd_HOST_OS) || defined(freebsd_HOST_OS) || defined(dragonfly_HOST_OS) || defined(netbsd_HOST_OS) || defined(darwin_HOST_OS))
return pthread_kill(pthread_self(), sig);
#else
return raise(sig);
More information about the ghc-commits
mailing list