Searched refs:test (Results 1 - 25 of 213) sorted by relevance

123456789

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/op/
H A Dgrep.t9 $test = 1;
14 print "ok $test\n";
21 $test++;
25 $test++;
29 $test++;
33 print map({$_} ("ok $test\n"));
34 $test++;
36 ({$_} ("ok $test\n"));
37 $test++;
38 print((map({a => $_}, ("ok $test\
[all...]
H A Dpat.t4 # the format supported by op/regexp.t. If you want to add a test
72 $* = 1; # test 3 only tested the optimized version--this one is for real
285 # removed test
289 $test = 73;
293 print "ok $test\n";
294 $test++;
297 print "ok $test\n";
298 $test++;
317 print "ok $test\n";
318 $test
[all...]
H A Dgv.t72 { package Foo::Bar; no warnings 'once'; $test=1; }
76 # test undef operator clearing out entire glob
83 # test warnings from assignment of undef to glob
94 # test *glob{THING} syntax
118 # test if defined() doesn't create any new symbols
121 my $test = 24;
125 ++$test; print "ok $test\n";
128 ++$test; print "ok $test\
[all...]
H A Doct.t7 my $test = 1;
9 sub test ($$$) { subroutine
25 print "ok $test # $act $string\n";
38 print "not ok $test # $act \"$string\" gives \"$result\" ($resstr), not $value ($valstr)\n";
40 $test++;
43 test ('oct', '0b1_0101', 0b101_01);
44 test ('oct', '0b10_101', 0_2_5);
45 test ('oct', '0b101_01', 2_1);
46 test ('oct', '0b1010_1', 0x1_5);
48 test ('oc
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Attribute/Handlers/demo/
H A Ddemo_chain.pl23 sub test : Postfix Prefix { subroutine
27 test();
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/t/
H A Dforgive.t39 my $test = 1;
45 print ((!defined $result)?"ok $test\n":"not ok $test\n"); $test++;
46 print (($@ ne '')?"ok $test\n":"not ok $test\n"); $test++;
60 print ((defined $result)?"ok $test\n":"not ok $test\n"); $test
[all...]
H A Dcroak.t3 # Please keep this test this simple. (ie just one test.)
5 # with 5.005_03. This test shows it up, whereas malice.t does not.
23 die "Oi! No! Don't change this test so that Carp is used before Storable"
30 for my $test (1,2) {
34 print "ok $test\n";
37 print "not ok $test # Expected a meaningful croak. Got '$@'\n";
/osnet-11/usr/src/grub/grub2/tests/lib/
H A Dunit_test.c25 #include <grub/test.h>
36 grub_test_t test; local
39 FOR_LIST_ELEMENTS (test, grub_test_list)
40 status = grub_test_run (test) ? : status;
/osnet-11/usr/src/grub/grub2/grub-core/tests/lib/
H A Dtest.c21 #include <grub/test.h>
28 /* The test source file name. */
31 /* The test function name. */
34 /* The test call line number. */
37 /* The test failure message. */
105 grub_test_t test; local
107 test = (grub_test_t) grub_malloc (sizeof (*test));
108 if (!test)
111 test
120 grub_test_t test; local
137 grub_test_run(grub_test_t test) argument
[all...]
H A Dfunctional_test.c22 #include <grub/test.h>
32 grub_test_t test; local
34 FOR_LIST_ELEMENTS (test, grub_test_list)
35 grub_test_run (test);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/
H A Dcomplete.pl47 local($prompt, @cmp_list, $return, @match, $l, $test, $cmp, $r);
64 $l = length($test = shift(@match));
67 until (substr($cmp, 0, $l) eq substr($test, 0, $l)) {
73 print($test = substr($test, $r, $l - $r));
74 $r = length($return .= $test);
/osnet-11/usr/src/grub/grub2/grub-core/tests/
H A Dexample_functional_test.c19 /* All tests need to include test.h for GRUB testing framework. */
20 #include <grub/test.h>
25 /* Functional test main method. */
37 /* Register example_test method as a functional test. */
/osnet-11/usr/src/grub/grub2/tests/
H A Dexample_unit_test.c22 /* All tests need to include test.h for GRUB testing framework. */
23 #include <grub/test.h>
25 /* Unit test main method. */
37 /* Register example_test method as a unit test. */
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Text/
H A DAbbrev.t36 my $test = 5;
41 print (($r eq $s)?"ok $test\n":"not ok $test\n"); $test++;
45 print (($r eq $s)?"ok $test\n":"not ok $test\n"); $test++;
51 print (($r eq $s)?"ok $test\n":"not ok $test\n"); $test
[all...]
H A DSoundex.t5 # test module for soundex.pl
26 $test = 0;
35 ++$test;
46 print "not ok $test\n";
60 print "not ok $test\n";
75 print "not ok $test\n";
91 print "not ok $test\n";
96 print "ok $test\n" unless $bad;
103 # Knuth's test cases, scalar in, scalar out
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Locale/Codes/t/
H A Dcountry.t16 # If it evaluates to FALSE, then "not ok N" is printed for the test,
18 # If it is true (1), the test is treated as passing, otherwise it failed.
120 foreach $test (@TESTS)
122 eval "print (($test->[0]) ? \"ok $testid\\n\" : \"not ok $testid\\n\" )";
125 if (!$test->[1])
H A Dcurrency.t14 # This is an array of tests. Each test is eval'd as an expression.
15 # If it evaluates to FALSE, then "not ok N" is printed for the test,
78 foreach $test (@TESTS)
80 eval "print (($test) ? \"ok $testid\\n\" : \"not ok $testid\\n\" )";
H A Dlanguages.t16 # This is an array of tests. Each test is eval'd as an expression.
17 # If it evaluates to FALSE, then "not ok N" is printed for the test,
32 #---- test recent changes ----------------------------------------------
103 foreach $test (@TESTS)
105 eval "print (($test) ? \"ok $testid\\n\" : \"not ok $testid\\n\" )";
H A Drename.t13 # This is an array of tests. Each test is eval'd as an expression.
14 # If it evaluates to FALSE, then "not ok N" is printed for the test,
72 foreach $test (@TESTS)
74 eval "print (($test) ? \"ok $testid\\n\" : \"not ok $testid\\n\" )";
H A Dscript.t11 # If it evaluates to FALSE, then "not ok N" is printed for the test,
13 # If it is true (1), the test is treated as passing, otherwise it failed.
89 foreach $test (@TESTS)
91 eval "print (($test->[0]) ? \"ok $testid\\n\" : \"not ok $testid\\n\" )";
94 if (!$test->[1])
H A Duk.t16 # This is an array of tests. Each test is eval'd as an expression.
17 # If it evaluates to FALSE, then "not ok N" is printed for the test,
63 foreach $test (@TESTS)
65 eval "print (($test) ? \"ok $testid\\n\" : \"not ok $testid\\n\" )";
/osnet-11/usr/src/lib/libc/amd64/gen/
H A Dstrlen.s60 test %edx, %edx
71 test %edx, %edx /* if no null byte, %edx must be 0 */
77 test %edx, %edx
83 test %edx, %edx
89 test %edx, %edx
113 test %dl, %dl
115 test $0x01, %dl
118 test $0x02, %dl
122 test $0x04, %dl
125 test
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/
H A DComplex.t21 my ($args, $op, $target, $test, $test_set, $try, $val, $zvalue, @set, @val);
23 $test = 0;
40 $test_set = 0; # Assume not a test over a set of values
60 test($zvalue, $target, @args);
63 test($op, undef, @args);
72 $test++;
78 print "# $test Re(z) = ",$z->Re(), " Im(z) = ", $z->Im(), " z = $z\n";
81 push(@script, qq(print "ok $test\\n"}\n));
83 $test++;
88 print "# $test R
352 sub test { subroutine
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/
H A Dtestlib.pm31 desirable to test it bypassing C<make test>. By adding
35 to a test program the intermediate directories used by C<make> are
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/t/
H A Dshowlex.t19 my $test = 1;
21 sub ok { print "ok $test\n"; $test++ }
33 print "# use5005threads: test $test skipped\n";

Completed in 59 milliseconds

123456789