From f8c2389db4a9b3239b00b9d209237d5116e12e3c Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 25 Jan 2017 07:02:33 -0400
Subject: - Renamed lux/data/struct/tree to lux/data/struct/tree/rose. - Moved
 lux/data/struct/zipper to lux/data/struct/tree/zipper. - Moved lux/regex to
 lux/lexer/regex. - Changed the suffix of annotation tags, from M to A. -
 Renamed Frac(tional) numbers to Deg(rees).

---
 luxc/src/lux.clj | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'luxc/src/lux.clj')

diff --git a/luxc/src/lux.clj b/luxc/src/lux.clj
index c1e04b9a3..d17f1640d 100644
--- a/luxc/src/lux.clj
+++ b/luxc/src/lux.clj
@@ -15,7 +15,7 @@
 
 (def unit-separator (str (char 31)))
 
-(defn ^:private process-dirs
+(defn ^:private separate-paths
   "(-> Text (List Text))"
   [resources-dirs]
   (-> resources-dirs
@@ -26,14 +26,14 @@
 (defn -main [& args]
   (|case (&/->list args)
     (&/$Cons "release" (&/$Cons program-module (&/$Cons resources-dirs (&/$Cons source-dirs (&/$Cons target-dir (&/$Nil))))))
-    (time (&compiler/compile-program &/$Release program-module (process-dirs resources-dirs) (process-dirs source-dirs) target-dir))
+    (time (&compiler/compile-program &/$Release program-module (separate-paths resources-dirs) (separate-paths source-dirs) target-dir))
 
     (&/$Cons "debug" (&/$Cons program-module (&/$Cons resources-dirs (&/$Cons source-dirs (&/$Cons target-dir (&/$Nil))))))
-    (time (&compiler/compile-program &/$Debug program-module (process-dirs resources-dirs) (process-dirs source-dirs) target-dir))
+    (time (&compiler/compile-program &/$Debug program-module (separate-paths resources-dirs) (separate-paths source-dirs) target-dir))
 
     (&/$Cons "repl" (&/$Cons resources-dirs (&/$Cons source-dirs (&/$Cons target-dir (&/$Nil)))))
-    (&repl/repl (process-dirs resources-dirs)
-                (process-dirs source-dirs)
+    (&repl/repl (separate-paths resources-dirs)
+                (separate-paths source-dirs)
                 target-dir)
 
     _
-- 
cgit v1.2.3