From c5d07ee83d1522b5ee9753d379dc1daf09600c08 Mon Sep 17 00:00:00 2001 From: Akshay Date: Mon, 12 Oct 2020 11:26:57 +0530 Subject: parse signed ints and floats correctly --- bin/Main.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'bin') diff --git a/bin/Main.hs b/bin/Main.hs index 7bb6d84..a088fdb 100644 --- a/bin/Main.hs +++ b/bin/Main.hs @@ -26,8 +26,7 @@ repl = do Just ",q" -> return () Just line -> do addHistory line - -- TODO: don't directly print Either values - print $ eval =<< readExpr line + putStrLn $ either show show $ eval =<< readExpr line repl main :: IO () -- cgit v1.2.3