From 1137f61adeb416d89436a6849a07f28c8f329fc1 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Sat, 14 Jul 2018 03:23:38 -0400 Subject: Switched to using new bit syntax in new-luxc. --- new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux') diff --git a/new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux b/new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux index d29b9ae7c..e47e123ad 100644 --- a/new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux @@ -32,7 +32,7 @@ ($t.method (list //runtime.$Stack) (#.Some $Object) (list)) - false))) + #0))) (def: popI $.Inst @@ -41,7 +41,7 @@ ($t.method (list //runtime.$Stack) (#.Some //runtime.$Stack) (list)) - false))) + #0))) (def: pushI $.Inst @@ -50,7 +50,7 @@ ($t.method (list //runtime.$Stack $Object) (#.Some //runtime.$Stack) (list)) - false))) + #0))) (exception: #export (Unrecognized-Path {message Text}) message) @@ -101,7 +101,7 @@ ($t.method (list $Object) (#.Some $t.boolean) (list)) - false) + #0) ($i.IFEQ @else))) (^template [ ] @@ -123,7 +123,7 @@ ($t.method (list //runtime.$Tuple $t.int) (#.Some $Object) (list)) - false) + #0) pushI)))) (["lux case tuple left" "pm_left"] ["lux case tuple right" "pm_right"]) @@ -140,7 +140,7 @@ ($t.method (list //runtime.$Variant //runtime.$Tag //runtime.$Flag) (#.Some //runtime.$Datum) (list)) - false) + #0) $i.DUP ($i.IFNULL @fail) ($i.GOTO @success) @@ -185,7 +185,7 @@ ($i.INVOKESTATIC hostL.runtime-class "pm_fail" ($t.method (list) #.None (list)) - false) + #0) $i.NULL ($i.GOTO @end))))) -- cgit v1.2.3