From cffe95a15256ea31c613fd478b78343a1329560b Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Tue, 8 Sep 1992 22:28:25 +0000 Subject: [PATCH] Changed to use new startup code. --- tools/inst-lisp | 4 ++-- tools/mk-lisp | 23 ++++------------------- 2 files changed, 6 insertions(+), 21 deletions(-) diff --git a/tools/inst-lisp b/tools/inst-lisp index ae4f5fe9e..cc4234704 100755 --- a/tools/inst-lisp +++ b/tools/inst-lisp @@ -1,6 +1,6 @@ #!/bin/csh -fx # -# $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/inst-lisp,v 1.3 1992/05/27 18:13:12 wlott Exp $ +# $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/inst-lisp,v 1.4 1992/09/08 22:28:25 wlott Exp $ # # Utility for installing an alpha core. # @@ -15,5 +15,5 @@ set src = /afs/cs/project/clisp/build/@sys/$subdir set dst = /afs/cs/project/clisp-3/alphas/@sys rm -f $dst/lisp $dst/lisp.core -cp -p $src/ldb/ldb $dst/lisp +cp -p $src/lisp/lisp $dst/lisp cp -p lisp.core $dst/lisp.core diff --git a/tools/mk-lisp b/tools/mk-lisp index 488ec3aae..568fcd694 100755 --- a/tools/mk-lisp +++ b/tools/mk-lisp @@ -2,7 +2,7 @@ # # mk-lisp -- script for building full lisp cores. # -# $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/mk-lisp,v 1.14 1992/03/24 00:42:35 wlott Exp $ +# $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/mk-lisp,v 1.15 1992/09/08 22:28:09 wlott Exp $ if ($#argv) then if ($argv[1] == "-now") then @@ -45,8 +45,8 @@ endif set dest = $root/build/@sys/$subdir set src = $root/src/$subdir -if (-e $dest/ldb/kernel.core) then - set core = $dest/ldb/kernel.core +if (-e $dest/lisp/kernel.core) then + set core = $dest/lisp/kernel.core else if (-e /usr/tmp/kernel.core) then set core = /usr/tmp/kernel.core @@ -65,25 +65,10 @@ if (-e $src/FEATURES) then set features = ($features `cat $src/FEATURES`) endif -# set a bunch of random env vars to fill up space. -setenv FOO XXXXXXXXXXXXXXXX -setenv FOO $FOO$FOO$FOO$FOO -setenv FOO $FOO$FOO$FOO$FOO -setenv BAR $FOO -setenv BAZ $FOO -setenv ACK $FOO -setenv RAZ $FOO -setenv GORP $FOO -setenv BAR2 $FOO -setenv BAZ2 $FOO -setenv ACK2 $FOO -setenv RAZ2 $FOO -setenv GORP2 $FOO - echo Building lisp.core version $version from the \`\`$subdir\'\' subdir. echo "Features: $features" -$dest/ldb/ldb -core $core << EOF +$dest/lisp/lisp -core $core << EOF (setf *features* (list* $features *features*)) (setf (search-list "lisp:") '("$dest/" "$src/")) (in-package "USER") -- GitLab