0.pre7.95:

[sbcl.git] / src / cold / set-up-cold-packages.lisp

diff --git a/src/cold/set-up-cold-packages.lisp b/src/cold/set-up-cold-packages.lisp
index 0380857..9db2eeb 100644 (file)
--- a/src/cold/set-up-cold-packages.lisp
+++ b/src/cold/set-up-cold-packages.lisp
@@ -56,8 +56,11 @@
                       (package-data-name package-data)
                       :nicknames (package-data-nicknames package-data)
                       :use nil)))
-       #!+sb-doc (setf (documentation package t)
-                       (package-data-doc package-data))
+       #-clisp ; As of "2.27 (released 2001-07-17) (built 3215971334)"
+               ; CLISP didn't support DOCUMENTATION on PACKAGE values.
+       (progn
+         #!+sb-doc (setf (documentation package t)
+                         (package-data-doc package-data)))
        ;; Walk the tree of exported names, exporting each name.
        (labels ((recurse (tree)
                   (etypecase tree