robustify the test a little

46b4e5c1 · Simon Marlow · fb609cf3 · 46b4e5c1
Commit 46b4e5c1 authored Jun 22, 2006 by Simon Marlow
--- a/testsuite/tests/ghc-regress/concurrent/should_run/conc056.hs
+++ b/testsuite/tests/ghc-regress/concurrent/should_run/conc056.hs
@@ -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
+