From 05e0f42eb4a44694b96297ce50b5a27eb6bb9f71 Mon Sep 17 00:00:00 2001
From: Luke Lau <luke_lau@icloud.com>
Date: Thu, 18 Jul 2019 00:35:35 +0100
Subject: [PATCH] Split out compiler into codegen and main

---
 compiler.scm => codegen.scm | 0
 main.scm                    | 6 ++++++
 sample.scm                  | 1 +
 3 files changed, 7 insertions(+)
 rename compiler.scm => codegen.scm (100%)
 create mode 100644 main.scm
 create mode 100644 sample.scm

diff --git a/compiler.scm b/codegen.scm
similarity index 100%
rename from compiler.scm
rename to codegen.scm
diff --git a/main.scm b/main.scm
new file mode 100644
index 0000000..29c03e5
--- /dev/null
+++ b/main.scm
@@ -0,0 +1,6 @@
+(load "codegen.scm")
+
+(compile-to-binary
+ (if (>= (length (command-line)) 1)
+     (call-with-input-file (cadr (command-line)) read)
+     (read)))
diff --git a/sample.scm b/sample.scm
new file mode 100644
index 0000000..75e6043
--- /dev/null
+++ b/sample.scm
@@ -0,0 +1 @@
+(let ((a 3) (b 4)) (+ a b))
-- 
2.30.2