From 607d918e9645cb9ea101515aae003a8d1d9fe8a7 Mon Sep 17 00:00:00 2001
From: tomsmeding <tom.smeding@gmail.com>
Date: Mon, 22 Apr 2019 18:35:21 +0200
Subject: Initial lowering code

---
 Main.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'Main.hs')

diff --git a/Main.hs b/Main.hs
index 249436c..3fc7aeb 100644
--- a/Main.hs
+++ b/Main.hs
@@ -4,6 +4,7 @@ import System.Environment
 import System.Exit
 
 import Compiler
+import Lower
 import Optimiser
 import Parser
 import VM
@@ -26,4 +27,6 @@ main = do
     irprog <- either die return (compileProgram prog)
     let opt = optimise irprog
     print opt
-    vmRun opt
+    -- vmRun opt
+    let asmprog = lowerIR opt
+    print asmprog
-- 
cgit v1.2.3-54-g00ecf