| /openbsd/src/gnu/usr.bin/perl/dist/base/t/ |
| D | fields-5_8_0.t | 104 my $testno = 0;
109 print "ok ", ++$testno, "\n";
114 print "ok ", ++$testno, "\n";
123 print "ok ", ++$testno, "\n";
128 print "ok ", ++$testno, "\n";
133 print "ok ", ++$testno, "\n";
136 print "ok ", ++$testno, "\n";
145 print "ok ", ++$testno, "\n";
149 print "ok ", ++$testno, "\n";
153 print "ok ", ++$testno, "\n";
[all …]
|
| D | fields-5_6_0.t | 142 my $testno = 0;
|
| /openbsd/src/gnu/usr.bin/perl/cpan/MIME-Base64/t/ |
| D | quoted-print.t | 202 my $testno = 0;
204 $testno++;
207 … if ($testno == 2) { $plain =~ s/\xe5/\x47/; $plain =~ s/\xe6/\x9c/g; $plain =~ s/\xf8/\x70/; }
208 if ($testno == 7) { $plain =~ s/\xff/\xdf/; }
215 print "not ok $testno\n";
223 print "not ok $testno\n";
226 print "ok $testno\n";
234 $testno++; print "ok $testno\n";
239 $testno++; print "ok $testno\n";
243 $testno++; print "ok $testno\n";
[all …]
|
| D | base64.t | 27 my $testno = 1;
38 print "ok ", $testno++, "\n";
332 print "test $testno ($plain): expected $expected, got $encoded\n";
337 print "test $testno ($encoded): expected $plain, got $decoded\n";
341 print "ok $testno\n";
342 $testno++;
375 die "test $testno ($encoded): expected $expected, got $decoded\n";
377 print "ok $testno\n";
378 $testno++;
|
| /openbsd/src/gnu/usr.bin/perl/dist/threads-shared/t/ |
| D | wait.t | 88 my $testno = $_[0];
90 ok($testno++, 1, "$test_type: child before lock");
92 ok($testno++, 1, "$test_type: child obtained lock");
100 ok($testno++, 1, "$test_type: child signalled condition");
102 return($testno);
221 my $testno = $_[0];
223 ok($testno++, 1, "$test_type: child before lock");
225 ok($testno++, 1, "$test_type: child obtained lock");
233 ok($testno++, 1, "$test_type: child signalled condition");
235 return($testno);
|
| D | waithires.t | 120 my $testno = $_[0];
131 ok($testno++, 1, "$test_type: child before lock");
133 ok($testno++, 1, "$test_type: child obtained lock");
144 ok($testno++, 1, "$test_type: child signalled condition");
146 return($testno, $t1-$t0);
255 my $testno = $_[0];
266 ok($testno++, 1, "$test_type: child before lock");
268 ok($testno++, 1, "$test_type: child obtained lock");
279 ok($testno++, 1, "$test_type: child signalled condition");
281 return($testno, $t1-$t0);
|
| /openbsd/src/gnu/usr.bin/perl/dist/Storable/t/ |
| D | compat01.t | 32 my $testno;
34 $testno++;
|
| /openbsd/src/regress/lib/libssl/tlslegacy/ |
| D | tlslegacytest.c | 559 tlslegacy_client_test(int testno, struct tlslegacy_client_test *tct) in tlslegacy_client_test() argument
566 fprintf(stderr, "Test %d - %s\n", testno, tct->desc); in tlslegacy_client_test()
|
| /openbsd/src/regress/lib/libc/cephes/ |
| D | ieetst.c | 590 void chkit( testno ) in chkit() argument
591 int testno; in chkit()
617 if( testno < 8 )
629 if( testno < 8 )
664 if( testno < 8 )
676 if( testno < 8 )
707 if( testno < 8 )
|
| /openbsd/src/regress/lib/libssl/server/ |
| D | servertest.c | 115 server_hello_test(int testno, struct server_hello_test *sht) in server_hello_test() argument
122 fprintf(stderr, "Test %d - %s\n", testno, sht->desc); in server_hello_test()
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Digest-MD5/t/ |
| D | files.t | 34 my $testno = 0;
50 print "ok ", ++$testno, " # Skip: PERL_CORE\n";
136 print "ok ", ++$testno, "\n";
|
| D | md5-aaa.t | 10 my $testno = 0;
28 print "ok ", ++$testno, "\n";
|
| /openbsd/src/gnu/usr.bin/perl/dist/threads/t/ |
| D | thread.t | 91 my $testno = shift;
92 my $same = sprintf( "%0.f", $testno);
93 return $testno eq $same;
|
| /openbsd/src/regress/lib/libssl/client/ |
| D | clienttest.c | 621 client_hello_test(int testno, const struct client_hello_test *cht) in client_hello_test() argument
633 fprintf(stderr, "Test %d - %s\n", testno, cht->desc); in client_hello_test()
|