Lines Matching refs:testno
44 my ($tiepack, $file, $testno) = @_;
57 print (($t1 == 5) ? "ok $testno\n" : "not ok $testno\n");
58 $testno++;
59 print (($t2 == 5) ? "ok $testno\n" : "not ok $testno\n");
71 $testno++;
72 print (($t3 == 5) ? "ok $testno\n" : "not ok $testno\n");
73 $testno++;
74 print (($t4 == 5) ? "ok $testno\n" : "not ok $testno\n");