0.pre7.14:

[sbcl.git] / src / compiler / vmdef.lisp

diff --git a/src/compiler/vmdef.lisp b/src/compiler/vmdef.lisp
index cf523ad..0d03768 100644 (file)
--- a/src/compiler/vmdef.lisp
+++ b/src/compiler/vmdef.lisp
@@ -201,7 +201,7 @@
   (flet ((convert (types more-types)
           (flet ((frob (x)
                    (if (eq x '*)
-                       't
+                       t
                        (ecase (first x)
                          (:or `(or ,@(mapcar #'(lambda (type)
                                                  (type-specifier