0.8.6.40:

[sbcl.git] / contrib / stale-symbols.lisp

diff --git a/contrib/stale-symbols.lisp b/contrib/stale-symbols.lisp
index 7d77e44..1e84555 100644 (file)
--- a/contrib/stale-symbols.lisp
+++ b/contrib/stale-symbols.lisp
@@ -71,7 +71,8 @@
                             (length static-space-refs)
                             (length dynamic-space-refs)))
                (format t "Symbol ~a::~a~%"
-                       (and (symbol-package obj) (package-name (symbol-package obj)))
+                       (and (symbol-package obj)
+                           (package-name (symbol-package obj)))
                        (symbol-name obj))
                (unless (null read-only-space-refs)
                  (princ "   Reference in read-only space: ")