Lines Matching refs:is

15 # down where the failure is, and supply your new names as a patch.
50 is (("AAAAA" & "zzzzz"), ($Aaz x 5));
51 is (("AAAAA" | "zzzzz"), ($Aoz x 5));
52 is (("AAAAA" ^ "zzzzz"), ($Axz x 5));
59 is (($foo & $bar), ($Aaz x 75 ));
61 is (($foo | $bar), ($Aoz x 75 . $zap));
63 is (($foo ^ $bar), ($Axz x 75 . $zap));
66 is ("ok \xFF\xFF\n" & "ok 19\n", "ok 19\n");
67 is ("ok 20\n" | "ok \0\0\n", "ok 20\n");
68 is ("o\000 \0001\000" ^ "\000k\0002\000\n", "ok 21\n");
71 is ("ok \x{FF}\x{FF}\n" & "ok 22\n", "ok 22\n");
72 is ("ok 23\n" | "ok \x{0}\x{0}\n", "ok 23\n");
73 is ("o\x{0} \x{0}4\x{0}" ^ "\x{0}k\x{0}2\x{0}\n", "ok 24\n");
76 is (sprintf("%vd", v4095 & v801), 801);
77 is (sprintf("%vd", v4095 | v801), 4095);
78 is (sprintf("%vd", v4095 ^ v801), 3294);
81 is (sprintf("%vd", v4095.801.4095 & v801.4095), '801.801');
82 is (sprintf("%vd", v4095.801.4095 | v801.4095), '4095.4095.4095');
83 is (sprintf("%vd", v801.4095 ^ v4095.801.4095), '3294.3294.4095');
85 is (sprintf("%vd", v120.300 & v200.400), '72.256');
86 is (sprintf("%vd", v120.300 | v200.400), '248.444');
87 is (sprintf("%vd", v120.300 ^ v200.400), '176.188');
92 is (sprintf("%vd", $a), '176.188');
96 is (sprintf("%vd", $a), '248.444');
117 is (join (', ', @not36), '');
137 is (join (', ', @not37), '');
141 is (~chr(~0), "\0");
153 is (join (', ', @not39), '');
163 is (join (', ', @not40), '');
167 is ("ok \xFF\x{FF}\n" & "ok 41\n", "ok 41\n");
168 is ("ok \x{FF}\xFF\n" & "ok 42\n", "ok 42\n");
178 ok(utf8::is_utf8($a)); # make sure UTF8 flag is still there
180 is($a, "\xFF", "~ works with utf-8");