From 190b512a822fefbb9c66271feb189cc6ccebaf85 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 15 Nov 2017 23:22:30 -0400
Subject: - Re-named "lux/meta" to to "lux/macro".

---
 new-luxc/source/luxc/lang/translation/structure.jvm.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

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

diff --git a/new-luxc/source/luxc/lang/translation/structure.jvm.lux b/new-luxc/source/luxc/lang/translation/structure.jvm.lux
index 2c04eaa0c..21d72b34b 100644
--- a/new-luxc/source/luxc/lang/translation/structure.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/structure.jvm.lux
@@ -4,7 +4,7 @@
                 ["ex" exception #+ exception:])
        (data text/format
              (coll [list]))
-       [meta]
+       [macro]
        [host #+ do-to])
   (luxc ["&" lang]
         (lang [";L" host]
@@ -23,7 +23,7 @@
 
 (def: #export (translate-tuple translate members)
   (-> (-> ls;Synthesis (Meta $;Inst)) (List ls;Synthesis) (Meta $;Inst))
-  (do meta;Monad<Meta>
+  (do macro;Monad<Meta>
     [#let [size (list;size members)]
      _ (&;assert Not-A-Tuple (%code (` [(~@ members)]))
                  (n.>= +2 size))
@@ -49,7 +49,7 @@
 
 (def: #export (translate-variant translate tag tail? member)
   (-> (-> ls;Synthesis (Meta $;Inst)) Nat Bool ls;Synthesis (Meta $;Inst))
-  (do meta;Monad<Meta>
+  (do macro;Monad<Meta>
     [memberI (translate member)]
     (wrap (|>. ($i;int (nat-to-int tag))
                (flagI tail?)
-- 
cgit v1.2.3