/openbsd/gnu/usr.bin/perl/cpan/Encode/t/ |
H A D | utf8strict.t | 46 qq/dd 64 73 73/ => 0, # 2.3.1 47 qq/dd 67 41 41/ => 0, # 2.3.2 48 qq/ee 42 73 73 71/ => 0, # 2.3.3 55 qq/ed 9f bf/ => 0, # 2.3.1 56 qq/ee 80 80/ => 0, # 2.3.2 57 qq/f4 8f bf bd/ => 0, # 2.3.3 59 qq/80/ => 1, # 3.1.1 60 qq/bf/ => 1, # 3.1.2 61 qq/80 bf/ => 1, # 3.1.3 62 qq/80 bf 80/ => 1, # 3.1.4 [all …]
|
/openbsd/gnu/usr.bin/perl/cpan/Math-BigInt-FastCalc/t/ |
H A D | bigintfc.t | 60 qq|$LIB->_str(\$x) = 39483|); 62 qq|$LIB->_str(\$y) = 321|); 67 qq|$LIB->_str(\$x) = 123|); 69 qq|$LIB->_str(\$y) = 321|); 211 qq|$LIB->_str(\$x) = "$_"|); 357 is($x, $_, qq|\$x = $_|); 520 qq|$LIB->_str(\$x) = "6"|); 682 . qq|$LIB->_new("0")))) = 0|); 685 . qq|$LIB->_new("0")))) = 0|); 688 . qq|$LIB->_new("0")))) = 0|); [all …]
|
H A D | biglog.t | 83 qq|$class->new(10)->blog()|); 88 qq|$class->new("0.1")->blog()|); 90 qq|$class->new("0.01")->blog()|); 92 qq|$class->new("0.001")->blog()|); 94 qq|$class->new("0.0001")->blog()|); 99 qq|$class->new(2)->blog()|); 101 qq|$class->new(4)->blog()|); 138 qq|$class->new("4")->blog(2, 10)|); 218 qq|$class->new(1)->bexp(100)|); 221 qq|$class->new("12.5")->bexp(91)|); [all …]
|
/openbsd/gnu/usr.bin/perl/cpan/Math-BigInt/t/ |
H A D | bigintc.t | 60 qq|$LIB->_str(\$x) = 39483|); 62 qq|$LIB->_str(\$y) = 321|); 67 qq|$LIB->_str(\$x) = 123|); 69 qq|$LIB->_str(\$y) = 321|); 211 qq|$LIB->_str(\$x) = "$_"|); 357 is($x, $_, qq|\$x = $_|); 520 qq|$LIB->_str(\$x) = "6"|); 682 . qq|$LIB->_new("0")))) = 0|); 685 . qq|$LIB->_new("0")))) = 0|); 688 . qq|$LIB->_new("0")))) = 0|); [all …]
|
H A D | mbimbf.inc | 79 qq|\${"$mbf\::precision"} = undef|); 81 qq|\${"$mbi\::precision"} = undef|); 93 qq|\${"$mbf\::round_mode"} = "$_"|); 95 qq|\${"$mbi\::round_mode"} = "$_"|); 250 qq|\$x->copy()->bdiv(3, $e)|); 404 # is($z, -123460, qq|$z|); 405 # is($x, 123456, qq|$x|); 1283 $try = qq|\$x = $mbi->new("$x");|; 1290 $try .= qq| \$y = $mbi->new("$y");|; 1350 $e = qq|Illegal sign $x->{sign}| [all …]
|
H A D | biglog.t | 83 qq|$class->new(10)->blog()|); 88 qq|$class->new("0.1")->blog()|); 90 qq|$class->new("0.01")->blog()|); 92 qq|$class->new("0.001")->blog()|); 94 qq|$class->new("0.0001")->blog()|); 99 qq|$class->new(2)->blog()|); 101 qq|$class->new(4)->blog()|); 138 qq|$class->new("4")->blog(2, 10)|); 218 qq|$class->new(1)->bexp(100)|); 221 qq|$class->new("12.5")->bexp(91)|); [all …]
|
H A D | bigfltpm.inc | 39 $try .= qq| \$x;|; 41 $try .= qq| \$x->$f();|; 45 $try .= qq| \$x->binf("$args[1]");|; 54 $try .= qq| \$x->$f();|; 56 $try .= qq| \$x->$f();|; 58 $try .= qq| \$x->$f();|; 63 $try .= qq| \$x = $f(\$x);|; 75 $try .= qq| $CLASS->bpi(\$x);|; 103 $try .= qq|);|; 110 $try .= qq|);|; [all …]
|
H A D | config.t | 53 subtest qq|New-style getter $class->config("\$key")| => sub { 68 subtest qq|Old-style getter $class->config()->{"\$key"}| => sub { 73 is($cfg->{$key}, $val, qq|$class->config()->{$key}|); 128 qq|$class->config("$key") set to $test->{$key}|); 137 qq|$class->config("$key")|); 147 qq|$class->config("$key") reset to | . 148 (defined($orig) ? qq|"$orig"| : "undef")); 205 qq|$class -> config("accuracy")|); 207 qq|$class -> config("precision")|); 217 qq|$class -> config("accuracy")|); [all …]
|
H A D | bigrat.t | 34 is($x, 1234, qq|\$x = $mbr->$method(1234)|); 37 is($x, 1234, qq|\$x = $mbr->$method("1234/1")|); 40 is($x, 617, qq|\$x = $mbr->$method("1234/2")|); 43 is($x, 100, qq|\$x = $mbr->$method("100/1.0")|); 46 is($x, 10, qq|\$x = $mbr->$method("10.0/1.0")|); 55 is($x, 10, qq|\$x = $mbr->$method("1e2/10")|); 61 is($x, 10, qq|\$x = $mbr->$method("1e2/1e1")|); 70 is($x, "NaN", qq|\$x = $mbr->$method("NaN")|); 73 is($x, "inf", qq|\$x = $mbr->$method("inf")|); 79 is($x, "NaN", qq|\$x = $mbr->$method("1/")|); [all …]
|
H A D | inf_nan.t | 82 $test = qq|\$x = $class->new("$args[0]"); | 83 . qq|\$y = $class->new("$args[1]"); | 84 . qq|\$z = \$x->badd(\$y);|; 160 $test = qq|\$x = $class->new("$args[0]"); | 161 . qq|\$y = $class->new("$args[1]"); | 162 . qq|\$z = \$x->bsub(\$y);|; 240 . qq|\$z = \$x->bmul(\$y);|; 325 . qq|\$q = \$x->bdiv(\$y);|; 350 . qq|(\$q, \$r) = \$x->bdiv(\$y);|; 373 . qq|\$m = \$x->bmod(\$y);|; [all …]
|
/openbsd/gnu/usr.bin/perl/cpan/Pod-Simple/t/ |
H A D | fcodes_s.t | 131 qq{ "Object Methods"\n\n} 136 qq{ "Object Methods"\n\n} 141 qq{ "Object Methods"\n\n} 227 x(qq{L<Net::Ping>\n}), 242 x(qq{L<crontab(5)>\n}), 257 x(qq{L</Object Methods>\n}), 349 o(qq{L<Net::Ping>}), 364 o(qq{L<crontab(5)>}), 374 o(qq{L</"Object Methods">}), 379 o(qq{L</Object Methods>}), [all …]
|
H A D | fcodes_l.t | 27 is($x->_out(qq{=pod\n\nL<Net::Ping>\n}), 31 is($x->_out(qq{=pod\n\nL<crontab(5)>\n}), 35 is($x->_out(qq{=pod\n\nL<login.conf(5)>\n}), 39 is($x->_out(qq{=pod\n\nL<foo_bar(5)>\n}), 54 is( $x->_out(qq{=pod\n\nL</Object Methods>\n}), 57 is( $x->_out(qq{=pod\n\nL<"Object Methods">\n}), 65 is($x->_out(qq{=pod\n\nL<Net::Ping>\n}), 89 is($x->_out(qq{=pod\n\nL<E<78>et::Ping>\n}), 138 is($x->_out(qq{=pod\n\nL<Net::Ping>\n}), 165 is($x->_out(qq{=pod\n\nL<Net::Ping>\n}), [all …]
|
H A D | begin.t | 303 qq{</for>}. 304 qq{<Para>Zubaaz.</Para>}. 305 qq{</for>}. 338 qq{</for>}. 340 qq{</for>}. 374 qq{</for>}. 376 qq{</for>}. 406 qq{</for>}. 408 qq{</for>}. 439 qq{</for>}. [all …]
|
/openbsd/gnu/usr.bin/perl/cpan/bignum/t/ |
H A D | bigrat.t | 25 is(1/3, '1/3', qq|1/3 = '1/3'|); 26 is(1/4+1/3, '7/12', qq|1/4+1/3 = '7/12'|); 27 is(5/7+3/7, '8/7', qq|5/7+3/7 = '8/7'|); 29 is(3/7+1, '10/7', qq|3/7+1 = '10/7'|); 30 is(3/7+1.1, '107/70', qq|3/7+1.1 = '107/70'|); 31 is(3/7+3/7, '6/7', qq|3/7+3/7 = '6/7'|); 33 is(3/7-1, '-4/7', qq|3/7-1 = '-4/7'|); 35 is(3/7-2/7, '1/7', qq|3/7-2/7 = '1/7'|); 38 # is(1+3/7, '10/7', qq|1+3/7 = '10/7'|); 41 is(3/7*5/7, '15/49', qq|3/7*5/7 = '15/49'|); [all …]
|
H A D | import-bigfloat.t | 24 qq|eval { bigfloat -> import("l" => "foo") }|); 30 qq|eval { bigfloat -> import("lib" => "foo") }|); 36 qq|eval { bigfloat -> import("try" => "foo") }|); 42 qq|eval { bigfloat -> import("try" => "foo") }|); 48 qq|eval { bigfloat -> import("foo" => "bar") }|); 54 qq|eval { bigfloat -> import("only" => "bar") }|); 62 qq|eval { bigfloat -> import($_ => "bar") }|);
|
H A D | import-bigrat.t | 24 qq|eval { bigrat -> import("l" => "foo") }|); 30 qq|eval { bigrat -> import("lib" => "foo") }|); 36 qq|eval { bigrat -> import("try" => "foo") }|); 42 qq|eval { bigrat -> import("try" => "foo") }|); 48 qq|eval { bigrat -> import("foo" => "bar") }|); 54 qq|eval { bigrat -> import("only" => "bar") }|); 62 qq|eval { bigrat -> import($_ => "bar") }|);
|
H A D | import-bigint.t | 24 qq|eval { bigint -> import("l" => "foo") }|); 30 qq|eval { bigint -> import("lib" => "foo") }|); 36 qq|eval { bigint -> import("try" => "foo") }|); 42 qq|eval { bigint -> import("try" => "foo") }|); 48 qq|eval { bigint -> import("foo" => "bar") }|); 54 qq|eval { bigint -> import("only" => "bar") }|); 62 qq|eval { bigint -> import($_ => "bar") }|);
|
H A D | import-bignum.t | 24 qq|eval { bignum -> import("l" => "foo") }|); 30 qq|eval { bignum -> import("lib" => "foo") }|); 36 qq|eval { bignum -> import("try" => "foo") }|); 42 qq|eval { bignum -> import("try" => "foo") }|); 48 qq|eval { bignum -> import("foo" => "bar") }|); 54 qq|eval { bignum -> import("only" => "bar") }|); 62 qq|eval { bignum -> import($_ => "bar") }|);
|
/openbsd/gnu/usr.bin/perl/cpan/JSON-PP/t/ |
H A D | gh_28_json_test_suite.t | 17 decode_should_fail(qq!123\x00!); 20 decode_should_fail(qq![-01]!); 23 decode_should_fail(qq![-012]!); 26 decode_should_fail(qq!{"a":"b"}/**/!); 29 decode_should_fail(qq!{"a":"b"}//!); 32 decode_should_fail(qq![\x00]!); 35 decode_should_fail(qq!{"a":/*comment*/"b"}!); 38 decode_should_fail(qq![\0x0c]!); 41 decode_should_pass(qq!\x00[\x00"\x00\xE9\x00"\x00]!); 44 decode_should_pass(qq![\x00"\x00\xE9\x00"\x00]\x00!);
|
/openbsd/gnu/usr.bin/perl/t/op/ |
H A D | packagev.t | 28 is( $@, '', qq/eval "$string"/ ); 30 is( $@, '', qq/eval "$string;"/ ); 32 is( $@, '', qq/eval "$string ;"/ ); 34 is( $@, '', qq/eval "{$string}"/ ); 36 is( $@, '', qq/eval "{ $string }"/ ); 38 is( $@, '', qq/eval "${string}{}"/ ); 40 is( $@, '', qq/eval "$string {}"/ ); 76 eval qq/\$ver = version->new("$v")/; 83 is($@, "", qq{version->new("$v")}); 93 eval qq/\$ver = version->new($v)/; [all …]
|
H A D | studytied.t | 41 ok( $x !~ /f/, qq{"next" doesn't match /f/} ); 45 ok( $x =~ /n/, qq{"next" matches /n/} ); 46 is( index( $x, 'n' ), 0, qq{"next" contains "n" at pos 0} ); 49 ok( $x =~ /t/, qq{"next" matches /t/} ); 50 is( index( $x, 't' ), 3, qq{"next" contains "t" at pos 3} );
|
/openbsd/gnu/usr.bin/perl/cpan/Text-ParseWords/t/ |
H A D | ParseWords.t | 8 my @words = shellwords(qq(foo "bar quiz" zoo)); 19 is(join(";", @words), qq(foo;"bar:foo";zoo zoo;)); 24 is(join(";", @words), qq(4; ;3; ;2; ;1; ;0)); 90 is(join(";", @words), qq(4;3;2;1;0)); 93 $string = qq{"field1" "field2\\\nstill field2" "field3"}; 96 is($result, qq{"field1"|"field2\\\nstill field2"|"field3"}); 103 $string = qq{"field1"\x{1234}"field2\\\x{1234}still field2"\x{1234}"field3"}; 110 $string = qq{"missing quote};
|
/openbsd/lib/libm/src/ld80/ |
H A D | s_erfl.c | 130 qq[6] = { variable 276 s = qq[0] + z * (qq[1] in erfl() 277 + z * (qq[2] + z * (qq[3] + z * (qq[4] + z * (qq[5] + z))))); in erfl() 352 s = qq[0] + z * (qq[1] in erfcl() 353 + z * (qq[2] + z * (qq[3] + z * (qq[4] + z * (qq[5] + z))))); in erfcl()
|
/openbsd/gnu/usr.bin/perl/t/opbasic/ |
H A D | arith.t | 379 print "not "x($a ne $b), "ok ", $T++, qq ' - \$1 vs "\$1" * something\n'; 382 print "not "x($a ne $b), "ok ", $T++, qq ' - something * \$1 vs "\$1"\n'; 385 print "not "x($a ne $b), "ok ", $T++, qq ' - \$1 vs "\$1" + something\n'; 388 print "not "x($a ne $b), "ok ", $T++, qq ' - something + \$1 vs "\$1"\n'; 391 print "not "x($a ne $b), "ok ", $T++, qq ' - \$1 vs "\$1" - something\n'; 394 print "not "x($a ne $b), "ok ", $T++, qq ' - something - \$1 vs "\$1"\n'; 398 print "not "x($a ne $b), "ok ", $T++, qq ' - \$1 vs "\$1" ** something\n'; 406 print "not "x($a ne $b), "ok ", $T++, qq ' - \$1 vs "\$1" / something\n'; 410 print "not "x($a ne $b), "ok ", $T++, qq ' - something / \$1 vs "\$1"\n'; 421 print "not "x($a ne $b), "ok ", $T++, qq ' - \$1 vs "\$1" % something\n'; [all …]
|
/openbsd/gnu/usr.bin/perl/t/comp/ |
H A D | parser.t | 113 eval q{ qq(foo$) }; 173 1 { qq => 'bar' } 176 0 { qq=bar= } 311 eval qq[ \$#$xFB ]; 316 eval qq[ \$$xFB ]; 318 eval qq[ \$$xFC ]; 321 eval qq[ %$xFB ]; 323 eval qq[ %$xFC ]; 331 eval qq[ *$xFC ]; 333 eval qq[ *$xFD ]; [all …]
|