diff options
| -rw-r--r-- | tests/signals004.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/signals004.hs b/tests/signals004.hs index 711a6eb..d822056 100644 --- a/tests/signals004.hs +++ b/tests/signals004.hs @@ -6,7 +6,9 @@ import Control.Monad -- signals are being constantly thrown and caught. installers = 50 -sigs = 10000 +-- too many signals overflows the IO manager's pipe buffer, this seems +-- to be the most we can get away with: +sigs = 400 main = do c <- newChan |