Lines Matching refs:bad
67 my $bad = 0;
72 $bad++;
77 $bad++;
80 print $bad ? "not " : "", "ok 1\n";
81 return $bad;
103 my $bad = 0;
119 $bad++ unless check($byte_count, $., "OLD", "BYTES");
120 $bad++ unless check($char_count, $., "OLD", "CHARS");
121 $bad++ unless check($chunk_count, $., "OLD", "CHUNKS");
122 $bad++ unless check($word_count, $., "OLD", "WORDS");
123 $bad++ unless check($tab_count, $., "OLD", "TABS");
135 $bad++ unless check($byte_count, $., "NEW", "BYTES");
136 $bad++ unless check($char_count, $., "NEW", "CHARS");
137 $bad++ unless check($chunk_count, $., "NEW", "CHUNKS");
138 $bad++ unless check($word_count, $., "NEW", "WORDS");
139 $bad++ unless check($tab_count, $., "NEW", "TABS");
147 $bad++;
151 print $bad ? "not " : "", "ok $num\n";
152 $Errors += $bad;