Fix TYPECASE macro for T/ELSE case.

diff --git a/src/boot.lisp b/src/boot.lisp
index 16463e5..484429e 100644 (file)
--- a/src/boot.lisp
+++ b/src/boot.lisp
@@ -488,7 +488,7 @@
        (cond
          ,@(mapcar (lambda (c)
                      (if (eq (car c) t)
-                         `((t ,@(rest c)))
+                         `(t ,@(rest c))
                          `((,(ecase (car c)
                                     (integer 'integerp)
                                     (cons 'consp)