Skip to content
Snippets Groups Projects
Commit 6805368b authored by wlott's avatar wlott
Browse files

Load bootstrap after setup, so it can refer to fns defined in setup.

parent 674cd68a
No related branches found
No related tags found
No related merge requests found
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
# #
# compile-all -- script to compile everything # compile-all -- script to compile everything
# #
# $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/compile-all,v 1.6 1992/02/25 00:14:32 wlott Exp $ # $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/compile-all,v 1.7 1992/02/27 06:02:56 wlott Exp $
set features = () set features = ()
set misfeatures = () set misfeatures = ()
...@@ -208,8 +208,8 @@ while ($#sysinfo > 0) ...@@ -208,8 +208,8 @@ while ($#sysinfo > 0)
(set-difference (list* '($features) *features*) '($misfeatures))) (set-difference (list* '($features) *features*) '($misfeatures)))
(setf (search-list "target:") '("$dest/" "$src/")) (setf (search-list "target:") '("$dest/" "$src/"))
(setq *compile-verbose* nil *compile-print* nil) (setq *compile-verbose* nil *compile-print* nil)
(load "$bootstrap" :if-does-not-exist nil)
(load "target:tools/setup") (load "target:tools/setup")
(load "$bootstrap" :if-does-not-exist nil)
(setf *interactive* nil *gc-verbose* nil) (setf *interactive* nil *gc-verbose* nil)
(load "target:tools/$this_comfile") (load "target:tools/$this_comfile")
(quit)) (quit))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment