[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