From 346ebd7146f36f3a3be3d8dd5c67d30657997e78 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Tue, 15 Oct 1991 15:30:52 +0000 Subject: [PATCH] Initial revision --- tools/compile-all | 59 +++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 59 insertions(+) create mode 100755 tools/compile-all diff --git a/tools/compile-all b/tools/compile-all new file mode 100755 index 000000000..a93ca2266 --- /dev/null +++ b/tools/compile-all @@ -0,0 +1,59 @@ +#!/bin/csh -f +# +# compile-all -- script to compile everything but PCL +# +# $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/compile-all,v 1.1 1991/10/15 15:30:52 ram Exp $ + +if ($#argv) then + set subdir = $argv[1] +else + set subdir = alpha +endif +set lisp = /afs/cs/project/clisp/@sys/$subdir + +lisp -noinit << EOF +(setf (search-list "target:") '("$lisp/")) +(load "target:tools/setup") +(comf "target:tools/setup") +(comf "target:tools/rcs") +(quit) +EOF + +lisp -noinit << EOF +(setf (search-list "target:") '("$lisp/")) +(load "target:tools/setup") +(push :small *features*) +(setf *interactive* nil *gc-verbose* nil) +(load "target:tools/worldcom") +(quit) +EOF + +lisp -noinit << EOF +(setf (search-list "target:") '("$lisp/")) +(setf (search-list "clx:") '("target:clx/")) +(load "target:tools/setup") +(push :small *features*) +(setf *interactive* nil *gc-verbose* nil) +(load "target:tools/clxcom") +(quit) +EOF + +lisp -noinit << EOF +(setf (search-list "target:") '("$lisp/")) +(load "target:tools/setup") +(push :small *features*) +(setf *interactive* nil *gc-verbose* nil) +(load "target:tools/hemcom") +(quit) +EOF + +lisp -noinit << EOF +(setf (search-list "target:") '("$lisp/")) +(load "target:tools/setup") +(push :small *features*) +(setf *interactive* nil *gc-verbose* nil) +(load "target:tools/comcom") +(quit) +EOF + +echo "Done..." -- GitLab