From a0f6a62c14d49973529537b28969e4179e5451e2 Mon Sep 17 00:00:00 2001 From: Marcin Chrzanowski Date: Mon, 14 May 2018 16:59:04 +0200 Subject: Change syntax error message --- Schmim.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- cgit v1.2.3