From a59fc865aee240afe21b82ffef2681bb9a6ea693 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 29 Jul 2018 02:30:13 -0400
Subject: Adapted new-luxc to some of the latest changes to Lux.

---
 new-luxc/source/luxc/lang/translation/jvm/structure.jvm.lux | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

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 4c29260f5..040c4dd59 100644
--- a/new-luxc/source/luxc/lang/translation/jvm/structure.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/jvm/structure.jvm.lux
@@ -31,7 +31,7 @@
   (do phase.Monad<Operation>
     [#let [size (list.size members)]
      _ (phase.assert not-a-tuple size
-                     (n/>= +2 size))
+                     (n/>= 2 size))
      membersI (|> members
                   list.enumerate
                   (monad.map @ (function (_ [idx member])
@@ -62,6 +62,6 @@
                (_.INVOKESTATIC //.runtime-class
                                "variant_make"
                                ($t.method (list $t.int $Object $Object)
-                                          (#.Some ($t.array +1 $Object))
+                                          (#.Some ($t.array 1 $Object))
                                           (list))
                                #0)))))
-- 
cgit v1.2.3