aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/jvm/expression.lux
diff options
context:
space:
mode:
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/jvm/expression.lux')
-rw-r--r--new-luxc/source/luxc/lang/translation/jvm/expression.lux34
1 files changed, 17 insertions, 17 deletions
diff --git a/new-luxc/source/luxc/lang/translation/jvm/expression.lux b/new-luxc/source/luxc/lang/translation/jvm/expression.lux
index ad2da41b6..800f79a41 100644
--- a/new-luxc/source/luxc/lang/translation/jvm/expression.lux
+++ b/new-luxc/source/luxc/lang/translation/jvm/expression.lux
@@ -20,7 +20,7 @@
["." loop]
["." function]])
-(def: #export (translate synthesis)
+(def: #export (translate archive synthesis)
Phase
(case synthesis
(^ (synthesis.bit value))
@@ -35,11 +35,11 @@
(^ (synthesis.text value))
(primitive.text value)
- (^ (synthesis.variant [lefts right? value]))
- (structure.variant translate lefts right? value)
+ (^ (synthesis.variant data))
+ (structure.variant translate archive data)
(^ (synthesis.tuple members))
- (structure.tuple translate members)
+ (structure.tuple translate archive members)
(^ (synthesis.variable variable))
(reference.variable variable)
@@ -47,26 +47,26 @@
(^ (synthesis.constant constant))
(reference.constant constant)
- (^ (synthesis.branch/let [input register expr]))
- (case.let translate input register expr)
+ (^ (synthesis.branch/let data))
+ (case.let translate archive data)
- (^ (synthesis.branch/if [test then else]))
- (case.if translate test then else)
+ (^ (synthesis.branch/if data))
+ (case.if translate archive data)
- (^ (synthesis.branch/case [input path]))
- (case.case translate input path)
+ (^ (synthesis.branch/case data))
+ (case.case translate archive data)
(^ (synthesis.loop/recur data))
- (loop.recur translate data)
+ (loop.recur translate archive data)
(^ (synthesis.loop/scope data))
- (loop.scope translate data)
+ (loop.scope translate archive data)
- (^ (synthesis.function/apply apply))
- (function.call translate apply)
+ (^ (synthesis.function/apply data))
+ (function.call translate archive data)
- (^ (synthesis.function/abstraction abstraction))
- (function.function translate abstraction)
+ (^ (synthesis.function/abstraction data))
+ (function.function translate archive data)
(#synthesis.Extension extension)
- (extension.apply translate extension)))
+ (extension.apply archive translate extension)))