X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FDEVEL%2Fpxp%2Fpxp%2Ftools%2Fcollect_files;fp=helm%2FDEVEL%2Fpxp%2Fpxp%2Ftools%2Fcollect_files;h=d1770eb4a89dbb7f0dabc6e6c0156c6bdd42326d;hb=c03d2c1fdab8d228cb88aaba5ca0f556318bebc5;hp=0000000000000000000000000000000000000000;hpb=758057e85325f94cd88583feb1fdf6b038e35055;p=helm.git

diff --git a/helm/DEVEL/pxp/pxp/tools/collect_files b/helm/DEVEL/pxp/pxp/tools/collect_files
new file mode 100755
index 000000000..d1770eb4a
--- /dev/null
+++ b/helm/DEVEL/pxp/pxp/tools/collect_files
@@ -0,0 +1,25 @@
+#! /bin/sh
+#
+# $Id$
+# ----------------------------------------------------------------------
+#
+# usage: collect_files file ...
+#
+# Prints the names of the files passed as arguments which actually
+# exist and are regular files.
+
+for x in "$@"; do
+    if [ -f "$x" ]; then
+	echo "$x"
+    fi
+done
+
+# ======================================================================
+#
+# $Log$
+# Revision 1.1  2000/11/17 09:57:35  lpadovan
+# Initial revision
+#
+# Revision 1.1  2000/07/27 21:07:26  gerd
+# 	Initial revision.
+#