X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tools-for-build%2Fwhitespacely-canonical-filenames;h=ff8f4ef88b76137a6b5a020626e886bd8648c230;hb=6bbc22725d3bf663726ed9adca544e39316364a6;hp=dd5167cc668a98eafbc3241185055eae778ad72d;hpb=04d819bb1a2e64de4e997203b9516229bb73c686;p=sbcl.git

diff --git a/tools-for-build/whitespacely-canonical-filenames b/tools-for-build/whitespacely-canonical-filenames
index dd5167c..ff8f4ef 100755
--- a/tools-for-build/whitespacely-canonical-filenames
+++ b/tools-for-build/whitespacely-canonical-filenames
@@ -14,6 +14,22 @@ source_extensions='.lisp .lisp-expr .c .h'
 #   .sh: if ./make.sh is altered, Bad Things happen
 #   ?
 
+stamp_file=whitespace-stamp
+
+if [ -e $stamp_file ]; then
+    find_opt="-newer $stamp_file"
+else
+    find_opt=""
+fi
+
 for source_extension in $source_extensions; do 
-    find . -name '*'$source_extension -print
+    find . \( \
+            -name _darcs -o \
+            -name '{arch}' -o \
+            -name CVS -o \
+            -name .hg -o \
+            -name .svn \) -type d -prune -o \
+           $find_opt -name '*'$source_extension -print
 done
+
+touch $stamp_file