aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/function.jvm.lux
diff options
context:
space:
mode:
authorEduardo Julian2017-11-15 23:22:30 -0400
committerEduardo Julian2017-11-15 23:22:30 -0400
commit190b512a822fefbb9c66271feb189cc6ccebaf85 (patch)
tree6d317f54649be741c67e03c71a8b6006b83f00ec /new-luxc/source/luxc/lang/translation/function.jvm.lux
parentf11c10f72d003555d76c9803954e2bd8b347362d (diff)
- Re-named "lux/meta" to to "lux/macro".
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/function.jvm.lux')
-rw-r--r--new-luxc/source/luxc/lang/translation/function.jvm.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/new-luxc/source/luxc/lang/translation/function.jvm.lux b/new-luxc/source/luxc/lang/translation/function.jvm.lux
index d12eca16e..d8a2077bc 100644
--- a/new-luxc/source/luxc/lang/translation/function.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/function.jvm.lux
@@ -4,7 +4,7 @@
(data [text]
text/format
(coll [list "list/" Functor<List> Monoid<List>]))
- [meta])
+ [macro])
(luxc ["&" lang]
(lang [";L" host]
(host ["$" jvm]
@@ -103,7 +103,7 @@
(def: (instance class arity env)
(-> Text ls;Arity (List Variable) (Meta $;Inst))
- (do meta;Monad<Meta>
+ (do macro;Monad<Meta>
[captureI+ (monad;map @ referenceT;translate-variable env)
#let [argsI (if (poly-arg? arity)
(|> (nullsI (n.dec arity))
@@ -278,7 +278,7 @@
(with-reset class arity env)
applyD
))]
- (do meta;Monad<Meta>
+ (do macro;Monad<Meta>
[instanceI (instance class arity env)]
(wrap [functionD instanceI]))))
@@ -286,7 +286,7 @@
(-> (-> ls;Synthesis (Meta $;Inst))
(List Variable) ls;Arity ls;Synthesis
(Meta $;Inst))
- (do meta;Monad<Meta>
+ (do macro;Monad<Meta>
[@begin $i;make-label
[function-class bodyI] (hostL;with-sub-context
(hostL;with-anchor [@begin +1]
@@ -310,7 +310,7 @@
(-> (-> ls;Synthesis (Meta $;Inst))
ls;Synthesis (List ls;Synthesis)
(Meta $;Inst))
- (do meta;Monad<Meta>
+ (do macro;Monad<Meta>
[functionI (translate functionS)
argsI (monad;map @ translate argsS)
#let [applyI (|> (segment runtimeT;num-apply-variants argsI)