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/host/common-lisp.lux | |
| parent | 0c0472862f5c1e543e6c5614a4cd112ac7d4cc13 (diff) | |
Switched to using new bit syntax in new-luxc.
Diffstat (limited to '')
| -rw-r--r-- | new-luxc/source/luxc/lang/host/common-lisp.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/new-luxc/source/luxc/lang/host/common-lisp.lux b/new-luxc/source/luxc/lang/host/common-lisp.lux index fb6a933df..2acc52700 100644 --- a/new-luxc/source/luxc/lang/host/common-lisp.lux +++ b/new-luxc/source/luxc/lang/host/common-lisp.lux @@ -54,8 +54,8 @@ (def: #export bool (-> Bit Expression) - (|>> (case> true (:abstraction "t") - false ..nil))) + (|>> (case> #0 ..nil + #1 (:abstraction "t")))) (def: #export int (-> Int Expression) |