Fix types for ~or! and ~and!

These were previously marked with `@bool` / `:@boolean` when they are, in fact, loobean operators. Fixed now.
Consensys · Dec 18, 2023 · 80d014a · 80d014a
1 parent e8560f5
commit 80d014a
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/stdlib.lisp b/src/stdlib.lisp
@@ -17,12 +17,12 @@
 (defpurefun (and a b) (* a b))
 (defpurefun ((~and :@bool) a b) (~ (and a b)))
 (defpurefun ((and! :@loob) a b) (+ a b))
-(defpurefun ((~and! :@bool) a b) (~ (and! a b)))
+(defpurefun ((~and! :@loob) a b) (~ (and! a b)))
 
 (defpurefun (or a b) (+ a b))
 (defpurefun ((~or :@boolean) a b) (~ (or a b)))
 (defpurefun ((or! :@loob) a b) (* a b))
-(defpurefun ((~or! :@boolean) a b) (~ (or! a b)))
+(defpurefun ((~or! :@loob) a b) (~ (or! a b)))
 
 (defpurefun ((not :@boolean :nowarn) (x :binary)) (- 1 x))