Home
last modified time | relevance | path

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

/openbsd/gnu/usr.bin/perl/
H A Dbuiltin.c454 OP *parent = entersubop, *pushop, *argop; in ck_builtin_func1() local
461 argop = OpSIBLING(pushop); in ck_builtin_func1()
463 if (!argop || !OpHAS_SIBLING(argop) || OpHAS_SIBLING(OpSIBLING(argop))) in ck_builtin_func1()
477 argop, in ck_builtin_func1()
480 OP * const op = newUNOP(opcode, wantflags, argop); in ck_builtin_func1()
H A Duniversal.c1387 OP *pushop, *argop; in optimize_out_native_convert_function() local
1405 argop = OpSIBLING(pushop); in optimize_out_native_convert_function()
1409 if ( ! argop in optimize_out_native_convert_function()
1410 || ! OpHAS_SIBLING(argop) in optimize_out_native_convert_function()
1411 || OpHAS_SIBLING(OpSIBLING(argop)) in optimize_out_native_convert_function()
1420 return argop; in optimize_out_native_convert_function()
H A Dpeep.c470 OP *argop; in S_maybe_multiconcat() local
493 argop = k2; in S_maybe_multiconcat()
496 argop = kid; in S_maybe_multiconcat()
520 else if ( argop->op_type == OP_CONST in S_maybe_multiconcat()
521 && ((sv = cSVOPx_sv(argop))) in S_maybe_multiconcat()
528 if (argop->op_private & OPpCONST_STRICT) in S_maybe_multiconcat()
529 no_bareword_allowed(argop); in S_maybe_multiconcat()
H A Dop.c13754 OP *argop; in Perl_ck_shift() local
13763 return newUNOP(type, 0, scalar(argop)); in Perl_ck_shift()
15595 OP * const argop = (opnum == OP_SELECT && code) ? NULL : in Perl_coresub_op() local
15604 argop, in Perl_coresub_op()
15613 o = newUNOP(OP_AVHVSWITCH,0,argop); in Perl_coresub_op()
15633 OP_LINESEQ, argop, in Perl_coresub_op()
15640 o = newUNOP(OP_ENTEREVAL,OPpEVAL_COPHH<<8,argop); in Perl_coresub_op()
15643 else o = newUNOP(opnum,0,argop); in Perl_coresub_op()
15648 argop->op_private |= OPpCOREARGS_DEREF1; in Perl_coresub_op()
15650 argop->op_private |= OPpCOREARGS_SCALARMOD; in Perl_coresub_op()
[all …]
/openbsd/gnu/usr.bin/perl/ext/XS-APItest/
H A DAPItest.xs752 OP *parent, *pushop, *argop, *estop; in THX_ck_entersub_establish_cleanup() local
761 argop = OpSIBLING(pushop); in THX_ck_entersub_establish_cleanup()
765 estop = mkUNOP(OP_RAND, argop); in THX_ck_entersub_establish_cleanup()
774 OP *parent, *pushop, *argop; in THX_ck_entersub_postinc() local
782 argop = OpSIBLING(pushop); in THX_ck_entersub_postinc()
786 op_lvalue(op_contextualize(argop, G_SCALAR), OP_POSTINC)); in THX_ck_entersub_postinc()
792 OP *pushop, *argop; in THX_ck_entersub_pad_scalar() local
799 argop = OpSIBLING(pushop); in THX_ck_entersub_pad_scalar()
800 if(argop->op_type != OP_CONST || OpSIBLING(argop)->op_type != OP_CONST) in THX_ck_entersub_pad_scalar()
802 a0 = cSVOPx_sv(argop); in THX_ck_entersub_pad_scalar()
[all …]