Home
last modified time | relevance | path

Searched refs:argop (Results 1 – 1 of 1) sorted by relevance

/mirbsd/src/gnu/usr.bin/perl/
Dop.c5975 OP *argop; in Perl_ck_shift() local
5980 argop = newOP(OP_PADAV, OPf_REF); in Perl_ck_shift()
5981 argop->op_targ = 0; /* PAD_SV(0) is @_ */ in Perl_ck_shift()
5984 argop = newUNOP(OP_RV2AV, 0, in Perl_ck_shift()
5989 argop = newUNOP(OP_RV2AV, 0, in Perl_ck_shift()
5992 return newUNOP(type, 0, scalar(argop)); in Perl_ck_shift()