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;