[project @ 2004-04-05 11:14:29 by simonpj]
[ghc-hetmet.git] / ghc / rts / Signals.c
index 749a683..ced711f 100644 (file)
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Signals.c,v 1.38 2003/09/21 13:22:03 igloo Exp $
+ * $Id: Signals.c,v 1.40 2003/10/31 23:24:47 sof Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -295,7 +295,7 @@ stg_sig_install(int sig, int spi, StgStablePtr *handler, void *mask)
        }
        return STG_SIG_ERR;
     }
-    
+
     if (previous_spi == STG_SIG_DFL || previous_spi == STG_SIG_IGN
        || previous_spi == STG_SIG_ERR) {
        return previous_spi;
@@ -440,7 +440,7 @@ initDefaultHandlers()
        prog_belch("warning: failed to install SIGINT handler");
     }
 
-#ifndef cygwin32_TARGET_OS
+#if defined(HAVE_SIGINTERRUPT)
     siginterrupt(SIGINT, 1);   // isn't this the default? --SDM
 #endif