once
- rv2gv refgen srefgen ref refassign lvref
+ rv2gv refgen srefgen ref refassign lvref lvrefslice
bless -- could be used to change ownership of objects
(reblessing)
"padrange",
"refassign",
"lvref",
+ "lvrefslice",
"freed",
};
#endif
"list of private variables",
"lvalue ref assignment",
"lvalue ref assignment",
+ "lvalue ref assignment",
"freed op",
};
#endif
Perl_pp_padrange,
Perl_pp_refassign,
Perl_pp_lvref,
+ Perl_pp_lvrefslice,
}
#endif
#ifdef PERL_PPADDR_INITED
Perl_ck_null, /* padrange */
Perl_ck_refassign, /* refassign */
Perl_ck_null, /* lvref */
+ Perl_ck_null, /* lvrefslice */
}
#endif
#ifdef PERL_CHECK_INITED
0x00000040, /* padrange */
0x00000240, /* refassign */
0x00000140, /* lvref */
+ 0x00000440, /* lvrefslice */
};
#endif
630, /* padrange */
632, /* refassign */
635, /* lvref */
+ -1, /* lvrefslice */
};
/* PADRANGE */ (OPpPADRANGE_COUNTMASK|OPpLVAL_INTRO),
/* REFASSIGN */ (OPpARG2_MASK|OPpLVREF_ELEM|OPpLVAL_INTRO),
/* LVREF */ (OPpARG1_MASK|OPpLVREF_ELEM|OPpLVAL_INTRO),
+ /* LVREFSLICE */ (0),
};
PERL_CALLCONV OP *Perl_pp_lslice(pTHX);
PERL_CALLCONV OP *Perl_pp_lt(pTHX);
PERL_CALLCONV OP *Perl_pp_lvref(pTHX);
+PERL_CALLCONV OP *Perl_pp_lvrefslice(pTHX);
PERL_CALLCONV OP *Perl_pp_mapwhile(pTHX);
PERL_CALLCONV OP *Perl_pp_match(pTHX);
PERL_CALLCONV OP *Perl_pp_method(pTHX);
padrange list of private variables ck_null d0
refassign lvalue ref assignment ck_refassign d2
lvref lvalue ref assignment ck_null d1
+lvrefslice lvalue ref assignment ck_null d@