From ac8213a3fc87e93c74505ab74f60522e384dc036 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Wed, 5 Jun 1991 14:05:45 +0000 Subject: [PATCH] Changed to use target/VERSION instead of the date if it exists, and to only shove down the version once, since that is what worldload now expects. --- tools/mk-lisp | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) diff --git a/tools/mk-lisp b/tools/mk-lisp index 97dec17eb..730e61695 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.4 1991/04/20 22:44:05 wlott Exp $ +# $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/mk-lisp,v 1.5 1991/06/05 14:05:45 ram Exp $ if ($#argv) then set subdir = $argv[1] @@ -24,7 +24,11 @@ else endif endif -set date = `/bin/date | awk '{print $2 "-" $3 "-" $6}'` +if (-e $lisp/VERSION) then + set version = `cat $lisp/VERSION` +else + set version = `/bin/date | awk '{print $2 "-" $3 "-" $6}'` +endif # set a bunch of random env vars to fill up space. setenv FOO XXXXXXXXXXXXXXXX @@ -36,16 +40,14 @@ setenv ACK $FOO setenv RAZ $FOO setenv GORP $FOO -echo Building lisp.core dated $date from the \`\`$subdir\'\' subdir. +echo Building lisp.core dated $version from the \`\`$subdir\'\' subdir. $lisp/ldb/ldb -core $core << EOF (setf *features* (append '($features) *features*)) (setf (search-list "lisp:") '("$lisp/")) (in-package "USER") (load (open "lisp:tools/worldload.lisp")) -$date -$date -$date +$version (quit) EOF -- GitLab