X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=clean.sh;h=9eaa20eb21c80f9c82762ffde1e99df4cd9cfc7d;hb=0d669e68a1ffbea42af6216f2ae8c7d7ca12ffb6;hp=4c055de733c19fd2d04700953d52c846df25d027;hpb=4fc9d21ae1d8a6a2f8ff70f589d5da103203de13;p=sbcl.git

diff --git a/clean.sh b/clean.sh
index 4c055de..9eaa20e 100755
--- a/clean.sh
+++ b/clean.sh
@@ -22,7 +22,20 @@ rm -rf obj/* output/* doc/user-manual \
 # distribution, we automatically clean up after it here in the 
 # standard clean.sh file.)
 
-# Within other directories, remove things which don't look like source
+# Ask some other directories to clean themselves up.
+original_pwd=`pwd`
+for d in tools-for-build; do
+    cd $d > /dev/null
+    # I hope the -s option is standard. At least GNU make and BSD make
+    # support it. It silences make, since otherwise the output from
+    # this script is just the operations done by these make's, which
+    # is misleading when this script does lotso other operations too.
+    # -- WHN
+    make -s clean
+    cd $original_pwd  > /dev/null
+done
+
+# Within all directories, remove things which don't look like source
 # files. Some explanations:
 #   (symlinks)
 #     are never in the sources; they must've been created
@@ -36,29 +49,46 @@ rm -rf obj/* output/* doc/user-manual \
 #   *.htm, *.html
 #     probably machine-generated translation of DocBook (*.sgml) files
 #   core
-#     probably a core dump -- not part of the sources anyway
+#     probably a Unix core dump -- not part of the sources anyway
+#   *.o, *.lib, *.nm
+#     results of C-style linking, assembling, etc.
+#   *.core, *.map
+#     looks like SBCL SAVE-LISP-AND-DIE or GENESIS output, and
+#     certainly not source
 #   *~, #*#, TAGS
 #     common names for editor temporary files
+#   .#*
+#     rubbish left behind by CVS updates
+#   *.htm, *.html
+#     The system doc sources are SGML, any HTML is
+#     automatically-generated output.
+#   depend
+#     made by "make depend" (or "gmake depend" or some such thing)
+#   *.x86f, *.axpf, *.lbytef, *.fasl
+#     typical extensions for fasl files
 find . \( \
-	-type l -or \
-	-name '*~' -or \
-	-name '#*#' -or \
-	-name '?*.x86f' -or \
-	-name '?*.lbytef' -or \
-	-name 'core' -or \
-	-name '?*.core' -or \
-	-name '*.map' -or \
-	-name '*.nm' -or \
-	-name '*.host-obj' -or \
-	-name '*.lisp-obj' -or \
-	-name '*.target-obj' -or \
-	-name '*.lib' -or \
-	-name '*.tmp' -or \
-	-name '*.o' -or \
-	-name 'sbcl' -or \
-	-name 'sbcl.h' -or \
-	-name 'depend' -or \
-	-name '*.htm' -or \
-	-name '*.html' -or \
-	-name 'TAGS' -or \
+	-type l -o \
+	-name '*~' -o \
+	-name '#*#' -o \
+	-name '.#*' -o \
+	-name '?*.x86f' -o \
+	-name '?*.axpf' -o \
+	-name '?*.lbytef' -o \
+	-name '?*.fasl' -o \
+	-name 'core' -o \
+	-name '?*.core' -o \
+	-name '*.map' -o \
+	-name '*.nm' -o \
+	-name '*.host-obj' -o \
+	-name '*.lisp-obj' -o \
+	-name '*.target-obj' -o \
+	-name '*.lib' -o \
+	-name '*.tmp' -o \
+	-name '*.o' -o \
+	-name 'sbcl' -o \
+	-name 'sbcl.h' -o \
+	-name 'depend' -o \
+	-name '*.htm' -o \
+	-name '*.html' -o \
+	-name 'TAGS' -o \
 	-name 'local-target-features.lisp-expr' \) -print | xargs rm -f