diff options
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.lux | 13 |
1 files changed, 6 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 4f3193bbf..e11187787 100644 --- a/new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/jvm/case.jvm.lux @@ -107,9 +107,9 @@ (_.GOTO @end)))) - (^template [<pattern> <method> <mod>] + (^template [<pattern> <method>] (^ (<pattern> idx)) - (operation/wrap (.case (<mod> idx) + (operation/wrap (.case idx 0 (|>> peekI (_.CHECKCAST ($t.descriptor runtime.$Tuple)) @@ -128,8 +128,8 @@ (list)) #0) pushI)))) - ([synthesis.member/left "pm_left" .id] - [synthesis.member/right "pm_right" .inc]) + ([synthesis.member/left "pm_left"] + [synthesis.member/right "pm_right"]) (^template [<pattern> <flag> <mod>] (^ (<pattern> idx)) @@ -222,9 +222,8 @@ [@end _.make-label valueI (translate valueS) pathI (..path translate path @end)] - (wrap (|>> valueI - _.NULL - _.SWAP + (wrap (|>> _.NULL + valueI pushI pathI (_.label @end))))) |