Lines Matching refs:tag
1187 my ($tag, $tag0, $sub, $res);
1189 while (($tag, $sub) = each(%warnings_match)) {
1193 $warnings{$tag} = 1 if ($res);
1261 ($tag, $tmp) = split(/\|/, $tag0, 2);
1263 next if ($warnings{$tag});
1277 $warnings{$tag} = 1;
1280 # shorten tag list:
1285 next if ($tg2 eq $tag);
1303 my $tag;
1304 foreach $tag (keys(%warnings)) {
1305 print $problems_fh "MISC: WARNING: $tag\n";