Fixing typo in lisp tests

diff --git a/extra/lisp/lisp-tests.factor b/extra/lisp/lisp-tests.factor
index fb8bf6de58bc54ae6755db4a548085c8f8133c86..7e51008ea01bdb58f7b8b889c397a67e9be46bbf 100644 (file)
--- a/extra/lisp/lisp-tests.factor
+++ b/extra/lisp/lisp-tests.factor
@@ -62,7 +62,7 @@ IN: lisp.test
     ] unit-test
     
     { T{ lisp-symbol f "if" } } [
-        "(defmacro if (pred tr fl) (list (quote cond) (list (list pred tr) (list t fl))))" lisp-eval
+        "(defmacro if (pred tr fl) (list (quote cond) (list (list pred tr) (list #t fl))))" lisp-eval
     ] unit-test
     
     { t } [