Merge upstream.

[jscl.git] / src / boot.lisp

diff --git a/src/boot.lisp b/src/boot.lisp
index f5fd74e..9b8a2e0 100644 (file)
--- a/src/boot.lisp
+++ b/src/boot.lisp
@@ -495,7 +495,7 @@
        (cond
          ,@(mapcar (lambda (c)
                      (if (eq (car c) t)
-                         `((t ,@(rest c)))
+                         `(t ,@(rest c))
                          `((,(ecase (car c)
                                     (integer 'integerp)
                                     (cons 'consp)