| Subject: | [PATCH] Adjust tests for bleadperl split optimisation |
The existing split-to-array optimisation now occurs in more places and affects the -a command-line switch.
This patch is already in bleadperl in commit 7cd2579d8.
| Subject: | open_8ygF4qoA.txt |
diff --git a/cpan/B-Debug/t/debug.t b/cpan/B-Debug/t/debug.t
index e523d3d..0af3bd9 100644
--- a/t/debug.t
+++ b/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