m-chrzan.xyz
aboutsummaryrefslogtreecommitdiff
path: root/Schmim.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Schmim.hs')
-rw-r--r--Schmim.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Schmim.hs b/Schmim.hs
index 3c0bc79..de166a3 100644
--- a/Schmim.hs
+++ b/Schmim.hs
@@ -28,7 +28,7 @@ runFile v p f = readFile f >>= run v p
run :: Verbosity -> ParseFun Exp -> String -> IO ()
run v p s = let ts = myLLexer s in case p ts of
- Bad s -> do putStrLn "\nParse Failed...\n"
+ Bad s -> do putStrLn "Syntax error"
exitFailure
Ok tree -> do let res = interp tree
case res of