diff options
author | kmu <kmu@hdfgroup.org> | 2019-11-25 21:17:55 (GMT) |
---|---|---|
committer | kmu <kmu@hdfgroup.org> | 2019-11-25 21:17:55 (GMT) |
commit | fc61b7a9f3a38331809ebcb6247482943947cdb8 (patch) | |
tree | ba9de335ebbd634656bf414d74eea506a1522227 /bin/warnhist | |
parent | d242a900f420b040e364f6c0976c01593e955db3 (diff) | |
download | hdf5-fc61b7a9f3a38331809ebcb6247482943947cdb8.zip hdf5-fc61b7a9f3a38331809ebcb6247482943947cdb8.tar.gz hdf5-fc61b7a9f3a38331809ebcb6247482943947cdb8.tar.bz2 |
using a different MACRO
Diffstat (limited to 'bin/warnhist')
-rwxr-xr-x | bin/warnhist | 2 |
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; |