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/analysis/expression.lux | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
(limited to 'new-luxc/source/luxc/lang/analysis/expression.lux')
diff --git a/new-luxc/source/luxc/lang/analysis/expression.lux b/new-luxc/source/luxc/lang/analysis/expression.lux
index 98addd197..5157848ec 100644
--- a/new-luxc/source/luxc/lang/analysis/expression.lux
+++ b/new-luxc/source/luxc/lang/analysis/expression.lux
@@ -5,7 +5,7 @@
(data ["e" error]
[product]
text/format)
- [meta]
+ [macro]
(lang [type]
(type ["tc" check]))
[host])
@@ -30,8 +30,8 @@
(-> &;Eval &;Analyser)
(: (-> Code (Meta la;Analysis))
(function analyse [ast]
- (do meta;Monad
- [expectedT meta;expected-type]
+ (do macro;Monad
+ [expectedT macro;expected-type]
(let [[cursor ast'] ast]
## The cursor must be set in the compiler for the sake
## of having useful error messages.
@@ -82,14 +82,14 @@
(structureA;analyse-tagged-sum analyse tag (' []))
(^ (#;Form (list& func args)))
- (do meta;Monad
+ (do macro;Monad
[[funcT =func] (commonA;with-unknown-type
(analyse func))]
(case =func
[_ (#;Symbol def-name)]
(do @
- [[def-type def-anns def-value] (meta;find-def def-name)]
- (if (meta;macro? def-anns)
+ [[def-type def-anns def-value] (macro;find-def def-name)]
+ (if (macro;macro? def-anns)
(do @
[expansion (function [compiler]
(case (macroH;expand (:! Macro def-value) args compiler)
--
cgit v1.2.3