Commit 1b8b285e authored by Michael Hanus's avatar Michael Hanus
Browse files

status output changed

parent 6670871a
......@@ -209,7 +209,8 @@ processInput rst g
evalExpression :: ReplState -> String -> IO ReplState
evalExpression rst expr = do
exst <- compileMainExpression rst expr True
unless (exst == 0) $ writeVerboseInfo rst 1 $ "Exit status: " ++ show exst
unless (exst == 0) $
writeVerboseInfo rst 1 $ "Non-zero exit status: " ++ show exst
return rst { exitStatus = exst }
-- Check whether the main module imports an "Unsafe" module.
......
Supports Markdown
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