diff options
Diffstat (limited to 'testsuite')
-rw-r--r-- | testsuite/tests/rts/T7815.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/rts/T7815.hs b/testsuite/tests/rts/T7815.hs index 2710da139f..8ede022677 100644 --- a/testsuite/tests/rts/T7815.hs +++ b/testsuite/tests/rts/T7815.hs @@ -17,7 +17,7 @@ test n = do guard (d || c) writeTVar dog False writeTVar cat False - + replicateM_ n (do forkIO (atomically setDog) forkIO (atomically setCat) |