Commit 3f9959fc authored by Ross Paterson's avatar Ross Paterson
Browse files

fix typo of exitcode

parent 0fefd2c5
......@@ -435,7 +435,7 @@ rawSystemStdin verbosity path args input = do
exitcode <- system $ unwords (map quote (path:args)) ++ " <" ++ quote tmpName
unless (exitcode == ExitSuccess) $ do
debug verbosity $ path ++ " returned " ++ show exitcode
exitWith exitCode
exitWith exitcode
return ()
#endif
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment