- WIP: Adjustments to new-luxc based on recent changes to stdlib.

1 files changed, 3 insertions, 3 deletions

diff --git a/new-luxc/source/luxc/lang/translation/jvm/structure.jvm.lux b/new-luxc/source/luxc/lang/translation/jvm/structure.jvm.lux
index 4a98d346d..fce1c6790 100644
--- a/new-luxc/source/luxc/lang/translation/jvm/structure.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/jvm/structure.jvm.lux
@@ -33,11 +33,11 @@
                                  (do @
                                    [memberI (translate member)]
                                    (wrap (|>> $i.DUP
-                                              ($i.int (nat-to-int idx))
+                                              ($i.int (.int idx))
                                               memberI
                                               $i.AASTORE)))))
                   (:: @ map $i.fuse))]
-    (wrap (|>> ($i.int (nat-to-int size))
+    (wrap (|>> ($i.int (.int size))
                ($i.array $Object)
                membersI))))
 
@@ -51,7 +51,7 @@
   (-> (-> ls.Synthesis (Meta $.Inst)) Nat Bool ls.Synthesis (Meta $.Inst))
   (do macro.Monad<Meta>
     [memberI (translate member)]
-    (wrap (|>> ($i.int (nat-to-int tag))
+    (wrap (|>> ($i.int (.int tag))
                (flagI tail?)
                memberI
                ($i.INVOKESTATIC hostL.runtime-class