id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc	os	architecture	failure	difficulty	testcase	blockedby	blocking	related
5761	Getting stdout and stderr as a single handle from createProcess does not work on Windows	SimonHengel		"The following test case works on Linux (an as far as I know on Mac OS X too), but not on Windows.
{{{
{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
module Spec (main) where
import           Test.HUnit
import           System.Process
import           System.IO

subprocess = concat $
  [ ""module Main where\n""
  , ""import System.IO\n""
  , ""main = do\n""
  , ""  hPutStr stderr \""foo\""\n""
  , ""  hFlush stderr\n""
  , ""  hPutStrLn stdout \""bar\""\n""
  , ""  hFlush stdout\n""
  ]

main = runTestTT $ TestCase $ do
  (Just hin, Just hout, Nothing, _) <-
    createProcess $ (proc ""runhaskell"" []) {
        std_in = CreatePipe
      , std_out = CreatePipe
      , std_err = UseHandle stdout
    }
  hPutStrLn hin subprocess
  hClose hin
  line <- hGetLine hout
  line @?= ""foobar""
}}}

Do we consider this a bug?  If not, what would be the suggested way to do that?"	bug	new	normal	7.6.2	libraries/process				sol@… kazu@…	Windows	x86	Incorrect result at runtime	Unknown