(not c) tests

2021-05-10 19:09:30 +02:00
parent d049675e9b
commit 22406e1314
2 changed files with 4 additions and 1 deletions
--- a/stdlib/stdlib.lsp
+++ b/stdlib/stdlib.lsp
@@ -1,5 +1,5 @@
 ; not a bool
-(defun not (x) (if x 0 1))
+(defun not (x) (if x nil 1))

 (defun is-pos? (n) (> n 0))
 (defun is-neg? (n) (< n 0))