From 16eb78529ebd0cf438aed500edec2eef6612cbcb Mon Sep 17 00:00:00 2001 From: Ɓukasz Hanuszczak Date: Thu, 6 Aug 2015 18:58:46 +0200 Subject: Fix issue with output being printed in incorrect order. --- html-test/run.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'html-test') diff --git a/html-test/run.hs b/html-test/run.hs index afd60a13..4103ad04 100755 --- a/html-test/run.hs +++ b/html-test/run.hs @@ -180,8 +180,10 @@ diffModule diff mdl = do writeFile refFile' $ Xml.ppElement refXml' putStrLn $ "Diff for module " ++ show mdl ++ ":" + hFlush stdout handle <- runProcess' diff $ processConfig { pcArgs = [outFile', refFile'] + , pcStdOut = Just $ stdout } waitForProcess handle >> return () where -- cgit v1.2.3