aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/lua
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/lua
parent0c0472862f5c1e543e6c5614a4cd112ac7d4cc13 (diff)
Switched to using new bit syntax in new-luxc.
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/lua')
-rw-r--r--new-luxc/source/luxc/lang/translation/lua/function.jvm.lux2
-rw-r--r--new-luxc/source/luxc/lang/translation/lua/runtime.jvm.lux14
2 files changed, 8 insertions, 8 deletions
diff --git a/new-luxc/source/luxc/lang/translation/lua/function.jvm.lux b/new-luxc/source/luxc/lang/translation/lua/function.jvm.lux
index 02b322de6..451e9dbb4 100644
--- a/new-luxc/source/luxc/lang/translation/lua/function.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/lua/function.jvm.lux
@@ -67,7 +67,7 @@
(lua.if! (lua.= arityO "num_args")
(lua.block! (list selfO
(lua.block! args-initsO+)
- (lua.while! (lua.bool true)
+ (lua.while! (lua.bool #1)
(lua.return! bodyO))))
(let [unpack (|>> (list) (lua.apply "table.unpack"))
recur (|>> (list) (lua.apply function-name))]
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