robustify the test a little
authorSimon Marlow <simonmar@microsoft.com>
Thu, 22 Jun 2006 09:21:48 +0000 (09:21 +0000)
committerSimon Marlow <simonmar@microsoft.com>
Thu, 22 Jun 2006 09:21:48 +0000 (09:21 +0000)
testsuite/tests/ghc-regress/concurrent/should_run/conc056.hs

index 78da723..e988311 100644 (file)
@@ -22,3 +22,5 @@ main = do
   forkOS (sequence_ $ repeat $ atomically (inc tv))
   forkOS (bad m)
   takeMVar m
+  threadDelay 100000 -- allow time for the exception to be printed
+