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/php | |
parent | 0c0472862f5c1e543e6c5614a4cd112ac7d4cc13 (diff) |
Switched to using new bit syntax in new-luxc.
Diffstat (limited to '')
-rw-r--r-- | new-luxc/source/luxc/lang/translation/php/eval.jvm.lux | 4 | ||||
-rw-r--r-- | new-luxc/source/luxc/lang/translation/php/runtime.jvm.lux | 12 |
2 files changed, 8 insertions, 8 deletions
diff --git a/new-luxc/source/luxc/lang/translation/php/eval.jvm.lux b/new-luxc/source/luxc/lang/translation/php/eval.jvm.lux index 3768bb5c7..3bfd5578a 100644 --- a/new-luxc/source/luxc/lang/translation/php/eval.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/php/eval.jvm.lux @@ -97,10 +97,10 @@ (def: (lux-object host-object) (-> Object (Error Any)) (cond (host.instance? php/runtime/memory/FalseMemory host-object) - (ex.return false) + (ex.return #0) (host.instance? php/runtime/memory/TrueMemory host-object) - (ex.return true) + (ex.return #1) (host.instance? php/runtime/memory/LongMemory host-object) (ex.return (LongMemory::toLong [] (:coerce LongMemory host-object))) diff --git a/new-luxc/source/luxc/lang/translation/php/runtime.jvm.lux b/new-luxc/source/luxc/lang/translation/php/runtime.jvm.lux index 045f8ceb7..7feb0033c 100644 --- a/new-luxc/source/luxc/lang/translation/php/runtime.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/php/runtime.jvm.lux @@ -36,19 +36,19 @@ (def: #export none Computation - (variant +0 false unit)) + (variant +0 #0 unit)) (def: #export some (-> Expression Computation) - (variant +1 true)) + (variant +1 #1)) (def: #export left (-> Expression Computation) - (variant +0 false)) + (variant +0 #0)) (def: #export right (-> Expression Computation) - (variant +1 true)) + (variant +1 #1)) (type: Runtime Statement) @@ -306,8 +306,8 @@ ## (_.if! (_.= old (_.nth atom//field atom)) ## ($_ _.then! ## (_.set-nth! atom//field new atom) -## (_.return! (_.bool true))) -## (_.return! (_.bool false))))) +## (_.return! (_.bool #1))) +## (_.return! (_.bool #0))))) ## (def: runtime//atom ## Runtime |