open intervals and type derivation
[sbcl.git] / tools-for-build / whitespacely-canonical-filenames
index 54e65de..e044375 100755 (executable)
@@ -9,17 +9,28 @@
 # glob patterns for source files in languages for which the
 # canonicalization is safe (not affecting meaning, at least given the
 # conservative syntax used in SBCL sources)
-source_extensions='.lisp .lisp-expr .c .h'
+source_extensions='.lisp .lisp-expr .c .h .asd'
 # other candidates:
 #   .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 . \( \
+            -path contrib/asdf -o \
             -name _darcs -o \
             -name '{arch}' -o \
             -name CVS -o \
             -name .hg -o \
             -name .svn \) -type d -prune -o \
-           -name '*'$source_extension -print
+           $find_opt -name '*'$source_extension -print
 done
+
+touch $stamp_file