Skip to content
Snippets Groups Projects
Commit 346ebd71 authored by ram's avatar ram
Browse files

Initial revision

parent 244b4aac
No related branches found
No related tags found
No related merge requests found
#!/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..."
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