Updated main to use the updated Code Generator.

This commit is contained in:
Samuel Hammersberg 2023-02-11 14:14:21 +01:00
parent 5d5a610cca
commit 818e57ff14

View file

@ -18,7 +18,9 @@ main = getArgs >>= \case
putStrLn "SYNTAX ERROR"
putStrLn err
exitFailure
Right prg -> compile prg
Right prg -> case compile prg of
Left err -> putStrLn err
Right res -> putStrLn res