[project @ 2005-11-03 16:47:45 by simonmar]

adjust type of startSignalHandlers() to make changes to Win32 version

diff --git a/ghc/rts/posix/Signals.c b/ghc/rts/posix/Signals.c
index 036411f..b4cc2fd 100644 (file)
--- a/ghc/rts/posix/Signals.c
+++ b/ghc/rts/posix/Signals.c
@@ -345,7 +345,7 @@ stg_sig_install(int sig, int spi, StgStablePtr *handler, void *mask)
 
 #if !defined(THREADED_RTS)
 void
-startSignalHandlers(void)
+startSignalHandlers(Capability *cap)
 {
   blockUserSignals();
   
@@ -353,9 +353,8 @@ startSignalHandlers(void)
 
     next_pending_handler--;
 
-    scheduleThread (
-       &MainCapability,
-       createIOThread(&MainCapability, 
+    scheduleThread (cap,
+       createIOThread(cap,
                       RtsFlags.GcFlags.initialStkSize, 
                       (StgClosure *) *next_pending_handler));
   }

diff --git a/ghc/rts/posix/Signals.h b/ghc/rts/posix/Signals.h
index 8f5a51b..3c5564b 100644 (file)
--- a/ghc/rts/posix/Signals.h
+++ b/ghc/rts/posix/Signals.h
@@ -16,7 +16,8 @@ extern rtsBool anyUserHandlers(void);
 extern StgPtr pending_handler_buf[];
 extern StgPtr *next_pending_handler;
 #define signals_pending() (next_pending_handler != pending_handler_buf)
-void startSignalHandlers(void);
+void startSignalHandlers(Capability *cap);
+
 
 #endif