X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2Fposix%2FSignals.c;h=b4cc2fd7fd2726dfc30137d05500a66b96fd175f;hb=f6feb336f56311aa0d9ed96418367f7ef339a555;hp=036411f8bfef679e403b87d457f845ad9260be64;hpb=71c492fc420ee9d2b6075e6a1bb7b8c2cf5f6b6d;p=ghc-hetmet.git diff --git a/ghc/rts/posix/Signals.c b/ghc/rts/posix/Signals.c index 036411f..b4cc2fd 100644 --- 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)); }