diff options
author | Ian Lynagh <igloo@earth.li> | 2007-03-22 18:29:00 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2007-03-22 18:29:00 +0000 |
commit | 4cc37e5758909aaec9ede20604ec4f01c04b54ea (patch) | |
tree | 66f86e0def7572cd8a460ba2dbb2a0c95e249606 /rts/posix/Select.c | |
parent | aba08f650f66a7979b7d8e513f8630663f33f4fb (diff) | |
download | haskell-4cc37e5758909aaec9ede20604ec4f01c04b54ea.tar.gz |
Add an --install-signal-handlers=<yes|no> RTS flag; fixes trac #804
Diffstat (limited to 'rts/posix/Select.c')
-rw-r--r-- | rts/posix/Select.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/posix/Select.c b/rts/posix/Select.c index bb65310c9e..57599bcee4 100644 --- a/rts/posix/Select.c +++ b/rts/posix/Select.c @@ -208,7 +208,7 @@ awaitEvent(rtsBool wait) * serviced. */ #if defined(RTS_USER_SIGNALS) - if (signals_pending()) { + if (RtsFlags.MiscFlags.install_signal_handlers && signals_pending()) { startSignalHandlers(&MainCapability); return; /* still hold the lock */ } |