Commit fa25624d authored by Simon Marlow's avatar Simon Marlow
Browse files

fixes to this test

parent af45af60
......@@ -2,7 +2,7 @@ import Control.Concurrent
import Control.Exception
main = do
stat
-- stat -- main thread is not bound in GHCi
m <- newEmptyMVar
forkIO (do stat; putMVar m ())
takeMVar m
......
(True,False)
(False,False)
(False,True)
(True,False)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment