From 9a49d1835f16fab3691798bcdcadee9d59fbe013 Mon Sep 17 00:00:00 2001 From: gbaz <gershomb@gmail.com> Date: Sat, 20 Jul 2019 20:13:07 -0400 Subject: [PATCH] Update Common.hs --- Common.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/Common.hs b/Common.hs index aa0ec2b..1906c31 100644 --- a/Common.hs +++ b/Common.hs @@ -45,7 +45,6 @@ rawSystemWithStdOutL outDir action flg prog args outFile = withResponseFile outD let cmdLine = prog++" "++unwords args++" >"++outFile when flg (hPutStrLn stderr ("Executing: " ++ cmdLine)) hOut <- openFile outFile WriteMode - process <- runProcess prog Nothing Nothing Nothing (Just hOut) Nothing (_ ,_ ,_ , process) <- -- We use createProcess here instead of runProcess since we need to specify -- a custom CreateProcess structure to turn on use_process_jobs when -- GitLab