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

Flush rcsupdate and -clean features.

parent 7276cb19
No related branches found
No related tags found
No related merge requests found
...@@ -2,15 +2,13 @@ ...@@ -2,15 +2,13 @@
# #
# compile-all -- script to compile everything # compile-all -- script to compile everything
# #
# $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/compile-all,v 1.14 1994/07/26 17:37:17 hallgren Exp $ # $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/compile-all,v 1.15 1994/10/27 16:58:21 ram Exp $
set features = () set features = ()
set misfeatures = () set misfeatures = ()
set target = "@sys" set target = "@sys"
set subdir = alpha set subdir = alpha
set core = "" set core = ""
set clean = 0
set update = 1
set interactive = "nil" set interactive = "nil"
set bootstrap = "target:bootstrap" set bootstrap = "target:bootstrap"
...@@ -52,14 +50,6 @@ while ($#argv > 0) ...@@ -52,14 +50,6 @@ while ($#argv > 0)
set interactive = "t" set interactive = "t"
breaksw breaksw
# Source tree management:
case "-clean":
set clean = 1
breaksw
case "-noupdate":
set update = 0
breaksw
# Select what to compile: # Select what to compile:
case "-compile": case "-compile":
set systems = $argv[2] set systems = $argv[2]
...@@ -95,12 +85,6 @@ Try these: ...@@ -95,12 +85,6 @@ Try these:
Remove <feature> from the features when compiling. May be used more Remove <feature> from the features when compiling. May be used more
than once. than once.
-clean <no arg>
Delete *.*f, *.fasl, *.assem, *.log and *.log.OLD in the destination.
-noupdate <no arg>
If specified, inhibits rcsupdate of the source tree.
-compile [All systems] -compile [All systems]
A comma-separated list of system names, e.g. "code,compiler". Order is A comma-separated list of system names, e.g. "code,compiler". Order is
not significant. All systems are compiled by default. not significant. All systems are compiled by default.
...@@ -156,11 +140,6 @@ if (-e $thissrc/MISFEATURES) then ...@@ -156,11 +140,6 @@ if (-e $thissrc/MISFEATURES) then
set misfeatures = ($misfeatures $tmp) set misfeatures = ($misfeatures $tmp)
endif endif
if $update then
echo "Updating source directory $thissrc ..."
(cd $thissrc; rcsupdate -q)
endif
if (-e $thissrc/SHADOW) then if (-e $thissrc/SHADOW) then
set thissrc = `cat $thissrc/SHADOW` set thissrc = `cat $thissrc/SHADOW`
goto nother_source goto nother_source
...@@ -171,30 +150,23 @@ echo "Source directory(ies): $src" ...@@ -171,30 +150,23 @@ echo "Source directory(ies): $src"
set dest = /afs/cs/project/clisp/build/$target/$subdir set dest = /afs/cs/project/clisp/build/$target/$subdir
echo "Target directory: $dest" echo "Target directory: $dest"
if $clean then if ({(echo $dest/*.log>/dev/null)}) then
echo "Cleaning up binaries and logs in $dest ..." echo "Preserving log files in $dest as .OLD ..."
(cd $dest;\ foreach foo ( $dest/*.log )
find . \( -name '*.*f' -o -name '*.assem' -o -name '*.fasl' \) \ set old = "${foo}.OLD"
-print -exec rm {} \; ;\ if (-e $old) then
rm *.log *.log.OLD) echo "" >>$old
else date >>$old
if ({(echo $dest/*.log>/dev/null)}) then echo "_________________________________________">>$old
echo "Preserving log files in $dest as .OLD ..." cat $foo >>$old
foreach foo ( $dest/*.log ) rm $foo
set old = "${foo}.OLD" else
if (-e $old) then mv $foo $old
echo "" >>$old endif
date >>$old end
echo "_________________________________________">>$old
cat $foo >>$old
rm $foo
else
mv $foo $old
endif
end
endif
endif endif
if ($?LISP) then if ($?LISP) then
echo "LISP environment variable override: $LISP" echo "LISP environment variable override: $LISP"
set lisp = "$LISP" set lisp = "$LISP"
......
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