From eff4c59794868b89d60fdc411f9b544a270b817e Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 2 Aug 2021 20:26:21 -0400
Subject: Fixed a bug in the new compiler which allowed the same module to be
 imported more than once.

---
 lux-jvm/source/luxc/lang/translation/jvm/runtime.lux | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

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

diff --git a/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux b/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux
index cccdf42bf..e8f678211 100644
--- a/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux
+++ b/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux
@@ -351,7 +351,7 @@
     (do phase.monad
       [_ (generation.execute! directive)
        _ (generation.save! ..runtime_id #.None directive)]
-      (wrap [..runtime_id #.None bytecode]))))
+      (in [..runtime_id #.None bytecode]))))
 
 (def: function_id
   1)
@@ -388,17 +388,17 @@
     (do phase.monad
       [_ (generation.execute! directive)
        _ (generation.save! ..function_id #.None directive)]
-      (wrap [..function_id #.None bytecode]))))
+      (in [..function_id #.None bytecode]))))
 
 (def: #export translate
   (Operation [Registry Output])
   (do phase.monad
     [runtime_payload ..translate_runtime
      function_payload ..translate_function]
-    (wrap [(|> artifact.empty
-               artifact.resource
-               product.right
-               artifact.resource
-               product.right)
-           (row.row runtime_payload
-                    function_payload)])))
+    (in [(|> artifact.empty
+             artifact.resource
+             product.right
+             artifact.resource
+             product.right)
+         (row.row runtime_payload
+                  function_payload)])))
-- 
cgit v1.2.3