Switched to using new bit syntax in new-luxc.

1 files changed, 7 insertions, 7 deletions

diff --git a/new-luxc/source/luxc/lang/translation/common-lisp/runtime.jvm.lux b/new-luxc/source/luxc/lang/translation/common-lisp/runtime.jvm.lux
index 43c1fd2a0..fe0a620d9 100644
--- a/new-luxc/source/luxc/lang/translation/common-lisp/runtime.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/common-lisp/runtime.jvm.lux
@@ -37,19 +37,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 Expression)
 
@@ -105,7 +105,7 @@
 (runtime: (lux//try op)
   (with-vars [error]
     (_.handler-case
-     (list [(_.bool true) error
+     (list [(_.bool #1) error
             (..left (_.format/3 _.nil (_.string "~A") (@@ error)))])
      (..right (_.funcall (list ..unit) (@@ op))))))
 
@@ -272,8 +272,8 @@
       (_.if (_.eq (@@ old) (@@ temp))
         (_.progn
          (list (_.setf! (_.svref (@@ atom) (_.int 0)) (@@ new))
-               (_.bool true)))
-        (_.bool false)))))
+               (_.bool #1)))
+        (_.bool #0)))))
 
 (def: runtime//atom
   Runtime