0.6.10.19:

[sbcl.git] / src / code / late-type.lisp

diff --git a/src/code/late-type.lisp b/src/code/late-type.lisp
index 1cfe57e..4e9190a 100644 (file)
--- a/src/code/late-type.lisp
+++ b/src/code/late-type.lisp
@@ -1873,8 +1873,8 @@
   |#
   ;; old code
   (reduce #'type-union
-        (mapcar #'specifier-type type-specifiers)
-        :initial-value *empty-type*))
+         (mapcar #'specifier-type type-specifiers)
+         :initial-value *empty-type*))
 \f
 ;;;; CONS types