diff options
author | nanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1999-04-07 20:34:01 +0000 |
---|---|---|
committer | nanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1999-04-07 20:34:01 +0000 |
commit | 5010355e9f7cd9d1a2c7f339e5aa1b4d900b4f10 (patch) | |
tree | 0fecdddf95c6ce6ba81bd1898243abf31a26d3d9 | |
parent | bc69483efe440d078ee1750f587d8beb711378b6 (diff) | |
download | ATCD-5010355e9f7cd9d1a2c7f339e5aa1b4d900b4f10.tar.gz |
*** empty log message ***
-rwxr-xr-x | bin/vc_filter.pl | 14 |
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/); +} |