From 022ada35548ef5e0e3b9614f9bb96de9d2137ced Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 10 May 2018 00:04:20 -0400
Subject: - Re-named "Compiler" type to "Lux".

---
 new-luxc/source/luxc/lang/translation.lux | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'new-luxc/source/luxc/lang/translation.lux')

diff --git a/new-luxc/source/luxc/lang/translation.lux b/new-luxc/source/luxc/lang/translation.lux
index cd9214885..4cab6d682 100644
--- a/new-luxc/source/luxc/lang/translation.lux
+++ b/new-luxc/source/luxc/lang/translation.lux
@@ -67,7 +67,7 @@
     (wrap [annsI (:! Code annsV)])))
 
 (def: (switch-compiler new-compiler)
-  (-> Compiler (Meta Aliases))
+  (-> Lux (Meta Aliases))
   (function (_ old-compiler)
     ((do macro.Monad<Meta>
        [this macro.current-module]
@@ -75,7 +75,7 @@
      new-compiler)))
 
 (def: #export (translate translate-module aliases code)
-  (-> (-> Text Compiler (Process Compiler)) Aliases Code (Meta Aliases))
+  (-> (-> Text Lux (Process Lux)) Aliases Code (Meta Aliases))
   (case code
     (^code ("lux module" (~ annsC)))
     (do macro.Monad<Meta>
@@ -184,7 +184,7 @@
 (def: no-aliases Aliases (dict.new text.Hash<Text>))
 
 (def: #export (translate-module source-dirs target-dir module-name compiler)
-  (-> (List File) File Text Compiler (Process Compiler))
+  (-> (List File) File Text Lux (Process Lux))
   (do io.Monad<Process>
     [[file-name file-content] (&io.read source-dirs module-name)
      #let [module-hash (text/hash file-content)
@@ -241,7 +241,7 @@
     ))
 
 (def: (initialize sources target)
-  (-> (List File) File (Process Compiler))
+  (-> (List File) File (Process Lux))
   (do io.Monad<Process>
     [compiler (case (runtimeT.translate ## (initL.compiler (io.run js.init))
                                         (initL.compiler (io.run hostL.init-host))
-- 
cgit v1.2.3