aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/meta/compiler/language/lux/phase/translation/lua/structure.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/meta/compiler/language/lux/phase/translation/lua/structure.lux')
-rw-r--r--stdlib/source/library/lux/meta/compiler/language/lux/phase/translation/lua/structure.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/library/lux/meta/compiler/language/lux/phase/translation/lua/structure.lux b/stdlib/source/library/lux/meta/compiler/language/lux/phase/translation/lua/structure.lux
index d9ad51d0f..d3b266697 100644
--- a/stdlib/source/library/lux/meta/compiler/language/lux/phase/translation/lua/structure.lux
+++ b/stdlib/source/library/lux/meta/compiler/language/lux/phase/translation/lua/structure.lux
@@ -3,7 +3,7 @@
(.require
[library
- [lux (.except Tuple Variant Synthesis)
+ [lux (.except Tuple Variant)
[abstract
["[0]" monad (.only do)]]
[meta
@@ -15,15 +15,15 @@
["[1][0]" primitive]
["///[1]" ////
["[0]" phase (.use "[1]#[0]" monad)]
- ["[1][0]" synthesis (.only Synthesis)]
+ ["[0]" synthesis]
[analysis
[complex (.only Variant Tuple)]]]])
(def .public (tuple phase archive elemsS+)
- (Translator (Tuple Synthesis))
+ (Translator (Tuple synthesis.Term))
(when elemsS+
{.#End}
- (phase#in (//primitive.text /////synthesis.unit))
+ (phase#in (//primitive.text synthesis.unit))
{.#Item singletonS {.#End}}
(phase archive singletonS)
@@ -34,6 +34,6 @@
(phase#each _.array))))
(def .public (variant phase archive [lefts right? valueS])
- (Translator (Variant Synthesis))
+ (Translator (Variant synthesis.Term))
(phase#each (//runtime.variant lefts right?)
(phase archive valueS)))