0.9.15.33:

[sbcl.git] / tools-for-build / whitespacely-canonical-filenames

diff --git a/tools-for-build/whitespacely-canonical-filenames b/tools-for-build/whitespacely-canonical-filenames
index dd5167c..a0f275d 100755 (executable)
--- a/tools-for-build/whitespacely-canonical-filenames
+++ b/tools-for-build/whitespacely-canonical-filenames
@@ -15,5 +15,7 @@ source_extensions='.lisp .lisp-expr .c .h'
 #   ?
 
 for source_extension in $source_extensions; do 
-    find . -name '*'$source_extension -print
+    find . -name _darcs -prune -o \
+           -name '{arch}' -prune -o \
+           -name '*'$source_extension -print
 done