summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authornanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>1999-04-07 20:34:01 +0000
committernanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>1999-04-07 20:34:01 +0000
commit5010355e9f7cd9d1a2c7f339e5aa1b4d900b4f10 (patch)
tree0fecdddf95c6ce6ba81bd1898243abf31a26d3d9
parentbc69483efe440d078ee1750f587d8beb711378b6 (diff)
downloadATCD-5010355e9f7cd9d1a2c7f339e5aa1b4d900b4f10.tar.gz
*** empty log message ***
-rwxr-xr-xbin/vc_filter.pl14
1 files changed, 14 insertions, 0 deletions
diff --git a/bin/vc_filter.pl b/bin/vc_filter.pl
new file mode 100755
index 00000000000..f986cb5676a
--- /dev/null
+++ b/bin/vc_filter.pl
@@ -0,0 +1,14 @@
+# $Id$
+
+$fname = $ARGV[0];
+
+open (fp, "$fname");
+
+while ($line = <fp>)
+{
+ print $line if ($line =~/^--------------------Configuration:/ ||
+ $line =~/^[A-Z_a-z0-9.]+ - [0-9]+ error\(s\), +[0-9]+ warning\(s\)/ ||
+ $line =~/^[A-Z_a-z0-9.\\:]+\([0-9]+\) : / ||
+ $line =~/^[A-Z_a-z0-9.\\:]+\.obj : / ||
+ $line =~/^fatal error/);
+}