summaryrefslogtreecommitdiffstats
path: root/bin/warnhist
diff options
context:
space:
mode:
authorkmu <kmu@hdfgroup.org>2019-11-25 21:17:55 (GMT)
committerkmu <kmu@hdfgroup.org>2019-11-25 21:17:55 (GMT)
commitfc61b7a9f3a38331809ebcb6247482943947cdb8 (patch)
treeba9de335ebbd634656bf414d74eea506a1522227 /bin/warnhist
parentd242a900f420b040e364f6c0976c01593e955db3 (diff)
downloadhdf5-fc61b7a9f3a38331809ebcb6247482943947cdb8.zip
hdf5-fc61b7a9f3a38331809ebcb6247482943947cdb8.tar.gz
hdf5-fc61b7a9f3a38331809ebcb6247482943947cdb8.tar.bz2
using a different MACRO
Diffstat (limited to 'bin/warnhist')
-rwxr-xr-xbin/warnhist2
1 files changed, 2 insertions, 0 deletions
diff --git a/bin/warnhist b/bin/warnhist
index 507477d..6ed529a 100755
--- a/bin/warnhist
+++ b/bin/warnhist
@@ -205,6 +205,7 @@ while (<>) {
($last_c_name, $toss) = split /\:/, $_;
}
+ # Retain C/C++ compile line, which comes with the line of warning
if($_ =~ /.*[A-Za-z0-9_]\.[chC]\(.*[0-9]\):.*#.*/) {
$last_c_name = $_;
}
@@ -265,6 +266,7 @@ while (<>) {
$line =~ s/^\s*line\s*//g;
# print "name:'", $name, "'-'", $line, "'\n";
# print "warning:'", $warning, "'\n";
+ # Check for Intel icc warning
} elsif($_ =~ /.*[A-Za-z0-9_]\.[chC]\(.*[0-9]\):.*#.*/) {
($last_c_name, $toss, $warning) = split /\:/, $last_c_name;
($name, $line) = split /\(/, $last_c_name;