From fb25a7ea401ce4133ce13a49543e6755458833ab Mon Sep 17 00:00:00 2001 From: VaclavT Date: Sat, 15 May 2021 13:29:49 +0200 Subject: [PATCH] false is nil not 0 --- stdlib/stdlib.lsp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/stdlib/stdlib.lsp b/stdlib/stdlib.lsp index fe95fd2..3b0b775 100644 --- a/stdlib/stdlib.lsp +++ b/stdlib/stdlib.lsp @@ -1,8 +1,8 @@ ; not a bool (defun not (x) (if x nil 1)) -(defun is-pos? (n) (> n 0)) -(defun is-neg? (n) (< n 0)) +(defun is-pos? (n) (> n nil)) +(defun is-neg? (n) (< n nil)) (defun neg (n) (- 0 n)) (defun dec (n) (- n 1))