aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux
diff options
context:
space:
mode:
authorEduardo Julian2018-07-14 03:23:38 -0400
committerEduardo Julian2018-07-14 03:23:38 -0400
commit1137f61adeb416d89436a6849a07f28c8f329fc1 (patch)
treefd2eb9c78b2df7116fcb3620e04f6d0eb26410e3 /new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux
parent0c0472862f5c1e543e6c5614a4cd112ac7d4cc13 (diff)
Switched to using new bit syntax in new-luxc.
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux')
-rw-r--r--new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux14
1 files changed, 7 insertions, 7 deletions
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 [<special> <method>]
@@ -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)))))