From 7c65d9e3404b7b57cfb9df214096b51069e49b75 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Sun, 8 Dec 1991 03:09:10 +0000 Subject: [PATCH] Initial revision --- tools/do-worldbuild | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100755 tools/do-worldbuild diff --git a/tools/do-worldbuild b/tools/do-worldbuild new file mode 100755 index 000000000..0e3fd56d2 --- /dev/null +++ b/tools/do-worldbuild @@ -0,0 +1,28 @@ +#!/bin/csh -fx +# +# do-worldbuild -- script to run worldbuild +# +# $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/do-worldbuild,v 1.1 1991/12/08 03:09:10 wlott Exp $ + +if ($#argv) then + set subdir = $argv[1] +else + set subdir = alpha +endif + +set dest = /afs/cs/project/clisp/build/@sys/$subdir +set src = /afs/cs/project/clisp/src/$subdir + +if ($?LISP) then + set lisp = $LISP +else + set lisp = lisp +endif + +$lisp -noinit << EOF +(setf (search-list "target:") '("$dest/" "$src/")) +(load "target:tools/setup") +(load "target:compiler/generic/genesis") +(load "target:tools/worldbuild") +(quit) +EOF -- GitLab