From 3baa6d87f9e0be009c5b23f0702da368ceab13a3 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Sat, 12 Mar 2016 23:33:54 -0400 Subject: - Added a REPL mode. --- src/lux.clj | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'src/lux.clj') diff --git a/src/lux.clj b/src/lux.clj index f1f43b7af..40e8a0d24 100644 --- a/src/lux.clj +++ b/src/lux.clj @@ -8,19 +8,23 @@ (:require [lux.base :as & :refer [|let |do return fail return* fail* |case]] [lux.compiler.base :as &compiler-base] [lux.compiler :as &compiler] + [lux.repl :as &repl] :reload-all) (:import (java.io File))) (defn -main [& args] (|case (&/->list args) - (&/$Cons "compile" (&/$Cons program-module (&/$Nil))) + (&/$Cons program-module (&/$Nil)) (time (&compiler/compile-program &/$Release program-module)) - (&/$Cons "compile" (&/$Cons "release" (&/$Cons program-module (&/$Nil)))) + (&/$Cons program-module (&/$Cons "release" (&/$Nil))) (time (&compiler/compile-program &/$Release program-module)) - (&/$Cons "compile" (&/$Cons "debug" (&/$Cons program-module (&/$Nil)))) + (&/$Cons program-module (&/$Cons "debug" (&/$Nil))) (time (&compiler/compile-program &/$Debug program-module)) + (&/$Nil) + (&repl/repl) + _ (println "Can't understand command."))) -- cgit v1.2.3