This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #123753] Fix assertion failure with map+map
authorFather Chrysostomos <sprout@cpan.org>
Fri, 6 Feb 2015 18:14:47 +0000 (10:14 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Fri, 6 Feb 2015 18:14:47 +0000 (10:14 -0800)
commitfb0c7c3c47fb17bb0b685b957af9a0cc581c8996
tree0703db1d1eb07eaa79a426915f889d1d254c3208
parent488bc5795891132d29daec7a860cab2a6266230c
[perl #123753] Fix assertion failure with map+map

ck_grep calls ck_fun, which sets the lower private bits to indicate
the number of operands.  ck_grep usually undoes that, by clobbering
op_private completetly.  If an error has occurred, it doesn’t, so we
may fail an assertion if the lower bits are not expected to be set on
mapstart and grepstart.
lib/B/Op_private.pm
opcode.h
regen/op_private
t/comp/parser.t