diff options
| author |  Simon Marlow <marlowsd@gmail.com> | 2009-03-10 09:09:16 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2009-03-10 09:09:16 +0000 |
| commit | d97a284fb6616ea4172589bcafa1035c916e73c6 (patch) | |
| tree | fa35c722494f37b07cdef04b976a65e478ddd133 /tests | |
| parent | 2da78209059e0b62803764215e92f5a87b9d8754 (diff) | |
fix this test: we were overflowing the IO manager's pipe with too many signals
Diffstat (limited to 'tests')
| -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 |