diff options
| author | Eduardo Julian | 2022-01-09 05:35:12 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2022-01-09 05:35:12 -0400 |
| commit | b7873d4b68ffc041f9ff134c52a32b54c20febf9 (patch) | |
| tree | b4892c00eee2e57ebd763b646dc4a89796235000 /lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux | |
| parent | 54e219ee24c1508713d07473cd8a3b04c7f8fe18 (diff) | |
Fixed a bug when testing extensions on the JVM compiler.
Diffstat (limited to '')
| -rw-r--r-- | lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux b/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux index 7048bdd25..17165b434 100644 --- a/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux +++ b/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux @@ -820,7 +820,7 @@ hidden [_ {synthesis.#Control {synthesis.#Branch {synthesis.#Case _ path}}}] - (loop [path path] + (loop [path (: synthesis.Path path)] (case path (^or {synthesis.#Pop} {synthesis.#Access _} @@ -908,8 +908,8 @@ (^template [<tag>] [(^ <tag>) body]) - ([{//////synthesis.#Primitive _}] - [(//////synthesis.constant _)]) + ([{synthesis.#Primitive _}] + [(synthesis.constant _)]) (^ (synthesis.variant [lefts right? sub])) (synthesis.variant [lefts right? (again sub)]) |