diff options
| author | Juan J. Martinez <jjm@usebox.net> | 2022-08-14 17:49:42 +0100 |
|---|---|---|
| committer | Juan J. Martinez <jjm@usebox.net> | 2022-08-14 17:49:42 +0100 |
| commit | 2b78e2b5689d05e484254c9878eeb08542dcfbc5 (patch) | |
| tree | c0cb3318fc8a3bbbc9770e349ded2dc2cf304d85 /src/Compiler.hs | |
| parent | fa4d7737f2a738fd82e62b84c8849bf67d12ceec (diff) | |
| download | micro-lang-hs-2b78e2b5689d05e484254c9878eeb08542dcfbc5.tar.gz micro-lang-hs-2b78e2b5689d05e484254c9878eeb08542dcfbc5.zip | |
Unnecessary parenthesis
Diffstat (limited to 'src/Compiler.hs')
| -rw-r--r-- | src/Compiler.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |