-;;; stems-and-flags.lisp-expr, without being quite parallel. (E.g.
-;;; object files end up alongside the source files instead of ending
-;;; up in parallel directory trees.) Maybe we could merge the
-;;; filenames here into stems-and-flags.lisp-expr with some new flag
-;;; (perhaps :WARM) to indicate that the files should be handled not
-;;; in cold load but afterwards. Alternatively, we could call
-(dolist (stem '(
- ;; CLOS, derived from the PCL reference implementation
- ;;
- ;; This PCL build order is based on a particular
- ;; linearization of the declared build order
- ;; dependencies from the old PCL defsys.lisp
- ;; dependency database.
- "src/pcl/walk"
- "src/pcl/iterate"
- "src/pcl/early-low"
- "src/pcl/macros"
- "src/pcl/low"
- "src/pcl/fin"
- "src/pcl/defclass"
- "src/pcl/defs"
- "src/pcl/fngen"
- "src/pcl/cache"
- "src/pcl/dlisp"
- "src/pcl/dlisp2"
- "src/pcl/boot"
- "src/pcl/vector"
- "src/pcl/slots-boot"
- "src/pcl/combin"
- "src/pcl/dfun"
- "src/pcl/fast-init"
- "src/pcl/braid"
- "src/pcl/dlisp3"
- "src/pcl/generic-functions"
- "src/pcl/slots"
- "src/pcl/init"
- "src/pcl/std-class"
- "src/pcl/cpl"
- "src/pcl/fsc"
- "src/pcl/methods"
- "src/pcl/fixup"
- "src/pcl/defcombin"
- "src/pcl/ctypes"
- "src/pcl/construct"
- "src/pcl/env"
- "src/pcl/documentation"
- "src/pcl/print-object"
- "src/pcl/precom1"
- "src/pcl/precom2"
-
- ;; miscellaneous functionality which depends on CLOS
- "src/code/force-delayed-defbangmethods"
-
- ;; CLOS-level support for the Gray OO streams
- ;; extension (which is also supported by various
- ;; lower-level hooks elsewhere in the code)
- "src/pcl/gray-streams-class"
- "src/pcl/gray-streams"
-
- ;; other functionality not needed for cold init, moved
- ;; to warm init to reduce peak memory requirement in
- ;; cold init
- "src/code/describe" ; FIXME: should be byte compiled
- "src/code/inspect" ; FIXME: should be byte compiled
- "src/code/profile"
- "src/code/ntrace"
- "src/code/foreign"
- "src/code/run-program"
-
- ;; Code derived from PCL's pre-ANSI DESCRIBE-OBJECT
- ;; facility is still used in our ANSI DESCRIBE
- ;; facility, and should be compiled and loaded after
- ;; our DESCRIBE facility is compiled and loaded.
- "src/pcl/describe")) ; FIXME: should probably be byte compiled
-
- (let ((fullname (concatenate 'string stem ".lisp")))
+;;; build-order.lisp-expr, without being quite parallel. (E.g. object
+;;; files end up alongside the source files instead of ending up in
+;;; parallel directory trees.) Maybe we could merge the filenames here
+;;; into build-order.lisp-expr with some new flag (perhaps :WARM) to
+;;; indicate that the files should be handled not in cold load but
+;;; afterwards.
+(dolist (stem '(;; CLOS, derived from the PCL reference implementation
+ ;;
+ ;; This PCL build order is based on a particular
+ ;; (arbitrary) linearization of the declared build
+ ;; order dependencies from the old PCL defsys.lisp
+ ;; dependency database.
+ #+nil "src/pcl/walk" ; #+NIL = moved to build-order.lisp-expr
+ "SRC;PCL;EARLY-LOW"
+ "SRC;PCL;MACROS"
+ "SRC;PCL;COMPILER-SUPPORT"
+ "SRC;PCL;LOW"
+ "SRC;PCL;SLOT-NAME"
+ "SRC;PCL;DEFCLASS"
+ "SRC;PCL;DEFS"
+ "SRC;PCL;FNGEN"
+ "SRC;PCL;WRAPPER"
+ "SRC;PCL;CACHE"
+ "SRC;PCL;DLISP"
+ "SRC;PCL;BOOT"
+ "SRC;PCL;VECTOR"
+ "SRC;PCL;SLOTS-BOOT"
+ "SRC;PCL;COMBIN"
+ "SRC;PCL;DFUN"
+ "SRC;PCL;CTOR"
+ "SRC;PCL;BRAID"
+ "SRC;PCL;DLISP3"
+ "SRC;PCL;GENERIC-FUNCTIONS"
+ "SRC;PCL;SLOTS"
+ "SRC;PCL;INIT"
+ "SRC;PCL;STD-CLASS"
+ "SRC;PCL;CPL"
+ "SRC;PCL;FSC"
+ "SRC;PCL;METHODS"
+ "SRC;PCL;FIXUP"
+ "SRC;PCL;DEFCOMBIN"
+ "SRC;PCL;CTYPES"
+ "SRC;PCL;ENV"
+ "SRC;PCL;DOCUMENTATION"
+ "SRC;PCL;PRINT-OBJECT"
+ "SRC;PCL;PRECOM1"
+ "SRC;PCL;PRECOM2"
+
+ ;; 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
+ ;; lower-level hooks elsewhere in the code)
+ "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
+ "SRC;CODE;DESCRIBE"
+ "SRC;CODE;DESCRIBE-POLICY"
+ "SRC;CODE;INSPECT"
+ "SRC;CODE;PROFILE"
+ "SRC;CODE;NTRACE"
+ "SRC;CODE;STEP"
+ "SRC;CODE;RUN-PROGRAM"))
+
+ (let ((fullname (concatenate 'string "SYS:" stem ".LISP")))