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/ruby/function.jvm.lux | 2 +- new-luxc/source/luxc/lang/translation/ruby/runtime.jvm.lux | 12 ++++++------ 2 files changed, 7 insertions(+), 7 deletions(-) (limited to 'new-luxc/source/luxc/lang/translation/ruby') diff --git a/new-luxc/source/luxc/lang/translation/ruby/function.jvm.lux b/new-luxc/source/luxc/lang/translation/ruby/function.jvm.lux index aecabc914..64c2bba2e 100644 --- a/new-luxc/source/luxc/lang/translation/ruby/function.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/ruby/function.jvm.lux @@ -62,7 +62,7 @@ (ruby.if! (ruby.= arityO "num_args") (ruby.block! (list selfO args-initsO+ - (ruby.while! (ruby.bool true) + (ruby.while! (ruby.bool #1) (ruby.return! bodyO)))) (ruby.return! (let [recur (function (_ args) (ruby.call (list args) function-name))] (ruby.? (ruby.> arityO "num_args") diff --git a/new-luxc/source/luxc/lang/translation/ruby/runtime.jvm.lux b/new-luxc/source/luxc/lang/translation/ruby/runtime.jvm.lux index 9d0d0f890..4ab5417a1 100644 --- a/new-luxc/source/luxc/lang/translation/ruby/runtime.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/ruby/runtime.jvm.lux @@ -34,19 +34,19 @@ (def: #export none Expression - (variant +0 false unit)) + (variant +0 #0 unit)) (def: #export some (-> Expression Expression) - (variant +1 true)) + (variant +1 #1)) (def: #export left (-> Expression Expression) - (variant +0 false)) + (variant +0 #0)) (def: #export right (-> Expression Expression) - (variant +1 true)) + (variant +1 #1)) (type: Runtime Ruby) @@ -228,8 +228,8 @@ (let [atom//field (ruby.string atom//field)] (ruby.if! (ruby.= old (ruby.nth atom//field atom)) (ruby.block! (list (ruby.set-nth! atom//field new atom) - (ruby.return! (ruby.bool true)))) - (ruby.return! (ruby.bool false))))) + (ruby.return! (ruby.bool #1)))) + (ruby.return! (ruby.bool #0))))) (def: runtime//atom Runtime -- cgit v1.2.3