Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/3f90064feff183aaa744db87704772874e6dc249

>---------------------------------------------------------------

commit 3f90064feff183aaa744db87704772874e6dc249
Author: Ian Lynagh <i...@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);



_______________________________________________
ghc-commits mailing list
ghc-commits@haskell.org
http://www.haskell.org/mailman/listinfo/ghc-commits

Reply via email to