diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2014-10-10 16:37:00 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2014-10-11 00:10:19 -0700 |
| commit | 7cd2579d8fb125bdcb4c992544790e2f8da497b2 (patch) | |
| tree | abf3e10c973c9df3d6eb7947431f9063b005fdf2 /cpan/B-Debug | |
| parent | 4ecee209f85984e2bab6cc57c1bf8429c45778c0 (diff) | |
| download | perl-7cd2579d8fb125bdcb4c992544790e2f8da497b2.tar.gz | |
Update B-Debug’s tests for split optimisation
This will have to be submitted upstream after this branch is merged.
Diffstat (limited to 'cpan/B-Debug')
| -rw-r--r-- | cpan/B-Debug/t/debug.t | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/cpan/B-Debug/t/debug.t b/cpan/B-Debug/t/debug.t index e523d3d565..0af3bd9fdb 100644 --- a/cpan/B-Debug/t/debug.t +++ b/cpan/B-Debug/t/debug.t @@ -59,6 +59,12 @@ leave enter nextstate label leaveloop enterloop null and defined null threadsv readline gv lineseq nextstate aassign null pushmark split pushre threadsv const null pushmark rvav gv nextstate subst const unstack EOF +} elsif ($] >= 5.021005) { + $b=<<EOF; +leave enter nextstate label leaveloop enterloop null and defined null null +gvsv readline gv lineseq nextstate split pushre null +gvsv const nextstate subst const unstack +EOF } else { $b=<<EOF; leave enter nextstate label leaveloop enterloop null and defined null null |