From b7873d4b68ffc041f9ff134c52a32b54c20febf9 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 9 Jan 2022 05:35:12 -0400
Subject: Fixed a bug when testing extensions on the JVM compiler.

---
 lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lux-jvm/source/luxc/lang/translation/jvm/extension')

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)])
-- 
cgit v1.2.3