X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcold%2Fwarm.lisp;h=4f0b476810726027c0596926f5c956116b04dda4;hb=a682f4c392bc874a6a898632889319ebdd8821fc;hp=f4687da2e7684d89721bed0746ffd95e35e4cf0b;hpb=7fb597b585fc715537ea644f7d84440eca217ca1;p=sbcl.git

diff --git a/src/cold/warm.lisp b/src/cold/warm.lisp
index f4687da..4f0b476 100644
--- a/src/cold/warm.lisp
+++ b/src/cold/warm.lisp
@@ -59,6 +59,9 @@
   (rename-package package
                   (package-name package)
                   (cons "SB-C-CALL" (package-nicknames package))))
+
+(let ((package (find-package "SB-SEQUENCE")))
+  (rename-package package (package-name package) (list "SEQUENCE")))
 
 ;;;; compiling and loading more of the system
 
@@ -159,6 +162,9 @@
                 "SRC;PCL;GRAY-STREAMS-CLASS"
                 "SRC;PCL;GRAY-STREAMS"
 
+                ;; CLOS-level support for User-extensible sequences.
+                "SRC;PCL;SEQUENCE"
+
                 ;; other functionality not needed for cold init, moved
                 ;; to warm init to reduce peak memory requirement in
                 ;; cold init
@@ -168,7 +174,7 @@
                 "SRC;CODE;PROFILE"
                 "SRC;CODE;NTRACE"
                 "SRC;CODE;STEP"
-                #-win32 "SRC;CODE;RUN-PROGRAM"
+                "SRC;CODE;RUN-PROGRAM"
 
                 ;; Code derived from PCL's pre-ANSI DESCRIBE-OBJECT
                 ;; facility is still used in our ANSI DESCRIBE