From 818e57ff14ea558f15b328aedcd9f2b6b1a68f91 Mon Sep 17 00:00:00 2001
From: Samuel Hammersberg <samuel.hammersberg@gmail.com>
Date: Sat, 11 Feb 2023 14:14:21 +0100
Subject: [PATCH] Updated main to use the updated Code Generator.

---
 src/Main.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/Main.hs b/src/Main.hs
index fbfe0eb..911de75 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -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