Add parser and ast generation for trivial programs

1 files changed, 4 insertions, 3 deletions

diff --git a/src/gscc b/src/gscc
index 82ed649..c5ddbd3 100755
--- a/src/gscc
+++ b/src/gscc
@@ -4,7 +4,8 @@
 
 
 (use-modules (ice-9 getopt-long)
-	     (modules lexer lexer))
+	     (modules lexer lexer)
+	     (modules parser parser))
 
 
 (define version "v0.1")
@@ -36,8 +37,8 @@ file on a success."
   (let* ((port (open-input-file file))
 	 (tokens (begin (set-current-input-port port)
 			(read-tokens))))
-    ;; (when parse?
-    ;;   )
+    (when parse?
+      (p-program tokens))
     (close-input-port port)))
 
 (define (postprocess file dest)