diff options
author | Eduardo Julian | 2018-07-14 03:23:38 -0400 |
---|---|---|
committer | Eduardo Julian | 2018-07-14 03:23:38 -0400 |
commit | 1137f61adeb416d89436a6849a07f28c8f329fc1 (patch) | |
tree | fd2eb9c78b2df7116fcb3620e04f6d0eb26410e3 /new-luxc/source/luxc/lang/translation/lua/runtime.jvm.lux | |
parent | 0c0472862f5c1e543e6c5614a4cd112ac7d4cc13 (diff) |
Switched to using new bit syntax in new-luxc.
Diffstat (limited to '')
-rw-r--r-- | new-luxc/source/luxc/lang/translation/lua/runtime.jvm.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/new-luxc/source/luxc/lang/translation/lua/runtime.jvm.lux b/new-luxc/source/luxc/lang/translation/lua/runtime.jvm.lux index 6be20a0e6..7c45f0786 100644 --- a/new-luxc/source/luxc/lang/translation/lua/runtime.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/lua/runtime.jvm.lux @@ -34,19 +34,19 @@ (def: none Expression - (variant +0 false unit)) + (variant +0 #0 unit)) (def: some (-> Expression Expression) - (variant +1 true)) + (variant +1 #1)) (def: left (-> Expression Expression) - (variant +0 false)) + (variant +0 #0)) (def: right (-> Expression Expression) - (variant +1 true)) + (variant +1 #1)) (type: Runtime Lua) @@ -189,7 +189,7 @@ @@bit//logical-right-shift) (runtime: (text//index subject param start) - (lua.block! (list (lua.local! "idx" (#.Some (lua.apply "string.find" (list subject param start (lua.bool true))))) + (lua.block! (list (lua.local! "idx" (#.Some (lua.apply "string.find" (list subject param start (lua.bool #1))))) (lua.if! (lua.= lua.nil "idx") (lua.return! none) (lua.return! (some "idx")))))) @@ -255,8 +255,8 @@ (let [atom//field (lua.string atom//field)] (lua.if! (lua.= old (lua.nth atom//field atom)) (lua.block! (list (lua.set! (lua.nth atom//field atom) new) - (lua.return! (lua.bool true)))) - (lua.return! (lua.bool false))))) + (lua.return! (lua.bool #1)))) + (lua.return! (lua.bool #0))))) (def: runtime//atom Runtime |