waitForProcess fails with "Bad file descriptor"

[yugr]

I am running this small sample program:

int main() { return -1; }

from this Haskell code (both from ghci and compiled):

import System.Process
main = system "a.exe" >> putStrLn "This is not printed"

and get this error

tmp.exe: waitForProcess: invalid argument (Bad file descriptor)

I guess there is a runtime error inside system-call which crashes execution.

I am on Windows 7, ghc 6.12.1. I tried both Cygwin g++ and MSVS cl C++ compilers.

One side question: is there any other way to run external program?

[yugr]

System.Process version 1.0.1.2

[yugr]

System.Cmd system also fails with same error.

[simonmar]

Did you compile with or without -threaded?

[yugr]

Without. Just standard ghc --make.

[simonmar]

Fixed;

Fri Aug 13 16:10:38 BST 2010  Simon Marlow <marlowsd@gmail.com>
  * Cope with an exit code of -1 (#4198)