X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcold%2Fwarm.lisp;h=d02357c93c5985a03c471b3b848374aacbc7c5e0;hb=3106f4c4d34c484331fb30b8b10a1dcac87bf8d0;hp=546f45b037f36233cadaaf77452c26c1822149ca;hpb=6f20436c86e66946ae1d2d3f4aef409c9845536b;p=sbcl.git

diff --git a/src/cold/warm.lisp b/src/cold/warm.lisp
index 546f45b..d02357c 100644
--- a/src/cold/warm.lisp
+++ b/src/cold/warm.lisp
@@ -136,6 +136,7 @@
 
 		;; miscellaneous functionality which depends on CLOS
 		"src/code/force-delayed-defbangmethods"
+                "src/code/late-condition"
 
 		;; CLOS-level support for the Gray OO streams
 		;; extension (which is also supported by various
@@ -210,13 +211,3 @@
 	       "public: the default package for user code and data")
 #+sb-doc (setf (documentation (find-package "KEYWORD") t)
 	       "public: home of keywords")
-
-;;; KLUDGE: It'd be nicer to do this in the table with the other
-;;; non-standard packages. -- WHN 19991206
-#+sb-doc (setf (documentation (find-package "SB-SLOT-ACCESSOR-NAME") t)
-	       "private: home of CLOS slot accessor internal names")
-
-;;; FIXME: There doesn't seem to be any easy way to get package doc strings
-;;; through the cold boot process. They need to be set somewhere. Maybe the
-;;; easiest thing to do is to read them out of package-data-list.lisp-expr
-;;; now?