fixes to this test

testsuite/tests/ghc-regress/concurrent/should_run/conc069.hs

@@ -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

testsuite/tests/ghc-regress/concurrent/should_run/conc069.stdout

-(True,False)
 (False,False)
 (False,True)
 (True,False)