From a305f9d58bf94658835d85420c1515e7d17fefe3 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Thu, 27 Oct 1994 16:58:21 +0000
Subject: [PATCH] Flush rcsupdate and -clean features.

---
 tools/compile-all | 60 +++++++++++++----------------------------------
 1 file changed, 16 insertions(+), 44 deletions(-)

diff --git a/tools/compile-all b/tools/compile-all
index 9d0832365..f3bf0ab7c 100755
--- a/tools/compile-all
+++ b/tools/compile-all
@@ -2,15 +2,13 @@
 #
 #  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 misfeatures = ()
 set target = "@sys"
 set subdir = alpha
 set core = ""
-set clean = 0
-set update = 1
 set interactive = "nil"
 set bootstrap = "target:bootstrap"
 
@@ -52,14 +50,6 @@ while ($#argv > 0)
 				set interactive = "t"
 				breaksw
 
-# Source tree management:
-			case "-clean":
-				set clean = 1
-				breaksw
-			case "-noupdate":
-			        set update = 0
-				breaksw
-
 # Select what to compile:
 			case "-compile":
 			        set systems = $argv[2]
@@ -95,12 +85,6 @@ Try these:
 	Remove <feature> from the features when compiling.  May be used more
 	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]
 	A comma-separated list of system names, e.g. "code,compiler".  Order is
 	not significant.  All systems are compiled by default.
@@ -156,11 +140,6 @@ if (-e $thissrc/MISFEATURES) then
 	set misfeatures = ($misfeatures $tmp)
 endif
 
-if $update then
-    echo "Updating source directory $thissrc ..."
-    (cd $thissrc; rcsupdate -q)
-endif
-
 if (-e $thissrc/SHADOW) then
     set thissrc = `cat $thissrc/SHADOW`
     goto nother_source
@@ -171,30 +150,23 @@ echo "Source directory(ies): $src"
 set dest = /afs/cs/project/clisp/build/$target/$subdir
 echo "Target directory: $dest"
 
-if $clean then
-    echo "Cleaning up binaries and logs in $dest ..."
-    (cd  $dest;\
-     find . \( -name '*.*f' -o -name '*.assem' -o -name '*.fasl' \) \
-	     -print -exec rm {} \; ;\
-     rm *.log *.log.OLD)
-else
-    if ({(echo $dest/*.log>/dev/null)}) then
-	echo "Preserving log files in $dest as .OLD ..."
-	foreach foo ( $dest/*.log )
-	    set old = "${foo}.OLD"
-	    if (-e $old) then
-	        echo "" >>$old
-		date >>$old
-		echo "_________________________________________">>$old
-		cat $foo >>$old
-		rm $foo
-	    else
-		mv $foo $old
-	    endif
-        end
-    endif
+if ({(echo $dest/*.log>/dev/null)}) then
+    echo "Preserving log files in $dest as .OLD ..."
+    foreach foo ( $dest/*.log )
+	set old = "${foo}.OLD"
+	if (-e $old) then
+	    echo "" >>$old
+	    date >>$old
+	    echo "_________________________________________">>$old
+	    cat $foo >>$old
+	    rm $foo
+	else
+	    mv $foo $old
+	endif
+    end
 endif
 
+
 if ($?LISP) then
 	echo "LISP environment variable override: $LISP"
 	set lisp = "$LISP"
-- 
GitLab