[project @ 2006-01-16 16:38:24 by simonmar]

Default signal handlers weren't being installed; amazing that this has
been broken ever since I rearranged the signal handling code.

ghc/includes/RtsConfig.h

@@ -78,4 +78,12 @@
 #define RET_LBL(f) f##_ret
 #endif
 
+/* -----------------------------------------------------------------------------
+   Signals - supported on non-PAR versions of the runtime.  See RtsSignals.h.
+   -------------------------------------------------------------------------- */
+
+#if !defined(PAR)
+#define RTS_USER_SIGNALS 1
+#endif
+
 #endif /* RTSCONFIG_H */

ghc/rts/RtsSignals.h

@@ -11,12 +11,10 @@
 
 #if !defined(PAR) && !defined(mingw32_HOST_OS)
 
-#define RTS_USER_SIGNALS 1
 #include "posix/Signals.h"
 
 #elif defined(mingw32_HOST_OS)
 
-#define RTS_USER_SIGNALS 1
 #include "win32/ConsoleHandler.h"
 
 #else /* PAR */

ghc/rts/posix/Select.c

@@ -208,7 +208,7 @@ awaitEvent(rtsBool wait)
 	   */
 #if defined(RTS_USER_SIGNALS)
 	  if (signals_pending()) {
-	      startSignalHandlers();
+	      startSignalHandlers(&MainCapability);
 	      return; /* still hold the lock */
 	  }
 #endif