System.Process.runInteractiveProcess generating unblockThread error

[George Russell]

Hello GHC hackers,

with 6.3.20041201 on x86/Linux,

 > # /local/home/ger/ghc-6.3/bin/ghc TestCT.hs -o testCT
 > # ./testCT
(here it hanged and I typed Control/C.)
 > testCT: internal error: unblockThread
 >     Please report this as a bug to glasgow-haskell-bugs at haskell.org,
 >    or http://www.sourceforge.net/projects/ghc/

best wishes,

George Russell
-------------- next part --------------
module Main where

import IO
import System
import Control.Concurrent
import System.Process


main =
   do
      (processIn,processOut,processErr,processHandle) <- runInteractiveProcess
         "cat" [] Nothing Nothing
      forkIO (hGetLine processOut >> return ())
      exitWith ExitSuccess