diff options
author | Father Chrysostomos <sprout@cpan.org> | 2014-09-29 22:23:22 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2014-10-11 00:10:13 -0700 |
commit | 4cb217963bb5dd7a847ee100592f6abd696c1f41 (patch) | |
tree | 46c1bae014f57ce30e43afe82f90ddf288db4248 /regen | |
parent | 2882b3ff194c533cea5909d6f11ee4a911ef0f9e (diff) | |
download | perl-4cb217963bb5dd7a847ee100592f6abd696c1f41.tar.gz |
lvavref needs OPpLVAL_INTRO and OPpPAD_STATE
Diffstat (limited to 'regen')
-rw-r--r-- | regen/op_private | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/regen/op_private b/regen/op_private index 918a7fe100..e18eda33e9 100644 --- a/regen/op_private +++ b/regen/op_private @@ -301,7 +301,7 @@ for (qw(nextstate dbstate)) { addbits($_, 7 => qw(OPpLVAL_INTRO LVINTRO)) for qw(gvsv rv2sv rv2hv rv2gv rv2av aelem helem aslice hslice delete padsv padav padhv enteriter entersub padrange - pushmark cond_expr refassign lvref lvrefslice), + pushmark cond_expr refassign lvref lvrefslice lvavref), 'list', # this gets set in my_attrs() for some reason ; @@ -472,7 +472,8 @@ addbits($_, 7 => qw(OPpPV_IS_UTF8 UTF)) for qw(last redo next goto dump); -addbits($_, 4 => qw(OPpPAD_STATE STATE)) for qw(padav padhv padsv pushmark); +addbits($_, 4 => qw(OPpPAD_STATE STATE)) for qw(padav padhv padsv lvavref + pushmark); |