From 2b78e2b5689d05e484254c9878eeb08542dcfbc5 Mon Sep 17 00:00:00 2001 From: "Juan J. Martinez" Date: Sun, 14 Aug 2022 17:49:42 +0100 Subject: Unnecessary parenthesis --- src/Compiler.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Compiler.hs') diff --git a/src/Compiler.hs b/src/Compiler.hs index 65f635b..f9c0eed 100644 --- a/src/Compiler.hs +++ b/src/Compiler.hs @@ -114,7 +114,7 @@ compile x = do case r of Just err -> addError $ Error err pos Nothing -> return $ Right rtyp - Right _ -> addError $ Error ("non callable value in function call") pos + Right _ -> addError $ Error "non callable value in function call" pos _ -> return $ Right Nothing (A.Return value pos) -> do (ev, errs) <- get -- cgit v1.2.3