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. --- .../source/luxc/lang/translation/python/function.jvm.lux | 2 +- new-luxc/source/luxc/lang/translation/python/runtime.jvm.lux | 12 ++++++------ 2 files changed, 7 insertions(+), 7 deletions(-) (limited to 'new-luxc/source/luxc/lang/translation/python') diff --git a/new-luxc/source/luxc/lang/translation/python/function.jvm.lux b/new-luxc/source/luxc/lang/translation/python/function.jvm.lux index 32522d1c0..d081dd52b 100644 --- a/new-luxc/source/luxc/lang/translation/python/function.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/python/function.jvm.lux @@ -80,7 +80,7 @@ ($_ python.then! (python.set! (list (referenceT.variable +0)) @function) args-initsO+ - (python.while! (python.bool true) + (python.while! (python.bool #1) (python.return! bodyO))) (python.if! (python.> arityO @num_args) (let [arity-args (python.slice (python.int 0) arityO @curried) diff --git a/new-luxc/source/luxc/lang/translation/python/runtime.jvm.lux b/new-luxc/source/luxc/lang/translation/python/runtime.jvm.lux index 70ce11a94..68af2d630 100644 --- a/new-luxc/source/luxc/lang/translation/python/runtime.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/python/runtime.jvm.lux @@ -36,19 +36,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 Statement) @@ -340,8 +340,8 @@ (python.if! (python.= old (python.nth atom//field atom)) ($_ python.then! (python.set-nth! atom//field new atom) - (python.return! (python.bool true))) - (python.return! (python.bool false))))) + (python.return! (python.bool #1))) + (python.return! (python.bool #0))))) (def: runtime//atom Runtime -- cgit v1.2.3