Lines Matching defs:do_test
45 sub do_test {
143 do_test('assignment of immediate constant (string)',
154 do_test('immediate constant (string)',
166 do_test('assignment of immediate constant (integer)',
173 do_test('immediate constant (integer)',
181 do_test('assignment of immediate constant (integer)',
193 my $type = do_test('result of addition',
203 do_test('floating point value',
224 do_test('integer constant',
232 do_test('undef',
240 do_test('reference to scalar',
255 do_test('immediate boolean',
267 do_test('assignment of boolean',
295 do_test('reference to array',
315 do_test('reference to hash',
333 do_test('reference to anon sub with empty prototype',
359 do_test('reference to named subroutine without prototype',
360 \&do_test,
372 NAME = "do_test" # $] >=5.021004
373 GVGV::GV = $ADDR\\t"main" :: "do_test" # $] < 5.021004
396 do_test('reference to regexp',
471 do_test('reference to blessed hash',
489 do_test('typeglob',
525 do_test('string with Unicode',
540 do_test('reference to hash containing Unicode',
569 do_test('scalar with pos magic',
601 do_test('tainted value in %ENV',
631 do_test('blessed reference',
656 do_test('constant subroutine',
692 do_test('isUV should show on PVMG',
701 do_test('IO',
726 do_test('FORMAT',
753 do_test('blessing to a class with embedded NUL characters',
771 do_test('ENAME on a stash',
794 do_test('ENAMEs on a stash',
818 do_test('ENAMEs on a stash with no NAME',
843 do_test('small hash',
869 do_test('small hash after keys',
899 do_test('small hash after keys and scalar',
929 do_test('Dump @array', '@array', <<'ARRAY', '', undef, 1);
954 do_test('Dump @array,1', '@array,1', <<'ARRAY', '', undef, 1);
970 do_test('Dump %hash', '%hash', <<'HASH', '', undef, 1);
987 do_test('Dump %tied', '%tied', <<'HASH', "", undef, 1);
1016 do_test('rvalue substr', 'substr $_, 1, 2', <<'SUBSTR', '', undef, 1);
1062 do_test('regular string constant', perl,
1075 do_test('string constant now an FBM', perl,
1095 do_test('string constant still an FBM', perl,
1113 do_test('regular string constant', beer,
1126 do_test('string constant quite unaffected', beer, 'SV = PV\\($ADDR\\) at $ADDR
1155 do_test('string constant now FBMed', beer, $want);
1161 do_test('string constant still FBMed', beer, $want);
1163 do_test('second string also unaffected', $pie, 'SV = PV\\($ADDR\\) at $ADDR
1184 do_test('UTF-8 in a regular expression',
1259 do_test('Branch Reset regexp',
1670 do_test('NV 1.0', 1.0,
1672 do_test('NV 1.0 + epsilon', 1.0 + $epsilon_p,
1674 do_test('NV 1.0 - epsilon', 1.0 - $epsilon_n,