/openbsd/gnu/usr.bin/perl/ |
H A D | op.c | 1831 cBINOPx(cUNOPo->op_first)->op_first->op_type == OP_CONST && in S_scalarboolean() 1973 kid = cLISTOPx(cUNOPo->op_first)->op_first; in Perl_scalar() 1976 op_null(cLISTOPx(cUNOPo->op_first)->op_first); in Perl_scalar() 3448 kid = cUNOPx(cUNOPo->op_first)->op_first; in Perl_op_lvalue_flags() 3692 op_null(cLISTOPx(cUNOPo->op_first)->op_first); in Perl_doref() 7544 OP *kid = cUNOPx(cUNOPx(curop)->op_first)->op_first; in Perl_pmruntime() 8146 OP * const kid = cUNOPx(cUNOPo->op_first)->op_first; in S_assignment_type() 12847 kid = cUNOPx(OpSIBLING(cLISTOPo->op_first))->op_first; in Perl_ck_grep() 13228 OP *varop = cUNOPx(cUNOPx(left)->op_first)->op_first; in Perl_ck_refassign() 13274 OpSIBLING(cUNOPx(cUNOPx(varop)->op_first)->op_first); in Perl_ck_refassign() [all …]
|
H A D | peep.c | 46 kid = cLISTOPo->op_first; in S_scalar_slice_warning() 128 pm = cUNOPo->op_first; in S_sprintf_is_multiconcatable() 308 topop = cBINOPo->op_first; in S_maybe_multiconcat() 339 targetop = cBINOPo->op_first; in S_maybe_multiconcat() 378 topop = cBINOPx(topop)->op_first; in S_maybe_multiconcat() 478 k1 = cUNOPx(kid)->op_first; in S_maybe_multiconcat() 1135 next_kid = cUNOPo->op_first; in S_optimize_op() 1203 return cUNOPo->op_first; in S_traverse_op_tree() 1693 OP *kid = cUNOPo->op_first; in S_aassign_scan() 1850 next_kid = cUNOPo->op_first; in S_aassign_scan() [all …]
|
H A D | op.h | 225 OP * op_first; member 230 OP *op_first; member 236 OP * op_first; member 242 OP * op_first; member 254 OP * op_first; member 263 OP* op_first; /* optree for method name */ member 275 OP * op_first; member 451 OP * op_first; member
|
H A D | builtin.c | 416 pushop = cUNOPx(entersubop)->op_first; in ck_builtin_func1() 418 pushop = cUNOPx(pushop)->op_first; in ck_builtin_func1()
|
H A D | pp_ctl.c | 179 cLOGOP->op_first->op_next = PL_op->op_next; in PP() 962 RETURNOP(cLISTOP->op_first); in PP() 1226 RETURNOP(cLOGOPx(cUNOP->op_first)->op_other); in PP() 1364 sv_setiv(PAD_SV(cUNOPx(cUNOP->op_first)->op_first->op_targ), 0); in PP() 2858 *ops++ = cUNOPo->op_first; in S_dofindlabel() 2862 && cUNOPo->op_first->op_type == OP_PUSHMARK) { in S_dofindlabel() 2872 OP * const kid = cUNOPo->op_first; in S_dofindlabel() 2882 OP * const kid1 = cUNOPo->op_first; in S_dofindlabel() 4138 if (cUNOP->op_first->op_type == OP_CONST && cUNOP->op_first->op_private & OPpCONST_NOVER) { in S_require_version() 4339 SVOP * const kid = cSVOPx(cUNOP->op_first); in S_require_file() [all …]
|
H A D | class.c | 612 OP *o = cLISTOPx(attrlist)->op_first; in Perl_class_apply_attributes() 709 OP *o = cLISTOPx(valop)->op_first; in Perl_class_seal_stash() 710 cLISTOPx(valop)->op_first = NULL; in Perl_class_seal_stash() 997 OP *o = cLISTOPx(attrlist)->op_first; in Perl_class_apply_field_attributes()
|
H A D | universal.c | 1353 pushop = cUNOPx(entersubop)->op_first; in optimize_out_native_convert_function() 1356 pushop = cUNOPx(pushop)->op_first; in optimize_out_native_convert_function()
|
H A D | sv.c | 16827 gv = cGVOPx_gv(cUNOPx(obase)->op_first); 16859 if (cUNOPx(obase)->op_first->op_type == OP_GV) { 16861 gv = cGVOPx_gv(cUNOPx(obase)->op_first); 16935 o = cUNOPx(obase)->op_first; 16952 o = cBINOPx(obase)->op_first; 16961 && cUNOPo->op_first->op_type == OP_GV) 16963 gv = cGVOPx_gv(cUNOPo->op_first); 16974 kid = cUNOPx(kid)->op_first; 17283 o = cUNOPx(obase)->op_first; 17328 o = cUNOPx(obase)->op_first; [all …]
|
H A D | pad.c | 2178 cUNOPx(cUNOPx(CvROOT(cv))->op_first)->op_first in S_cv_clone_pad()
|
H A D | pp_sort.c | 739 OP *nullop = OpSIBLING(cLISTOP->op_first); /* pass pushmark */ in PP()
|
H A D | dump.c | 1134 OP *kid = cUNOPx(p)->op_first; in S_do_op_dump_bar() 1465 for (kid = cUNOPo->op_first; kid; kid = OpSIBLING(kid)) in S_do_op_dump_bar()
|
H A D | perly.y | 887 OP *defexpr = cLOGOPx(defop)->op_first;
|
H A D | regcomp.c | 1322 for (o = cLISTOPx(expr)->op_first; o; o = OpSIBLING(o)) in Perl_re_op_compile() 1342 for (o = cLISTOPx(expr)->op_first; o; o = OpSIBLING(o)) { in Perl_re_op_compile() 1358 for (o = cLISTOPx(expr)->op_first; o; o = OpSIBLING(o)) { in Perl_re_op_compile() 1374 expr = cLISTOPx(expr)->op_first; in Perl_re_op_compile()
|
H A D | regexec.c | 8291 OP *o = cUNOPx(nop)->op_first; in S_regmatch() 8294 o = cUNOPo->op_first; in S_regmatch() 8298 o = cUNOPo->op_first; in S_regmatch()
|
H A D | perly.act | 1013 OP *defexpr = cLOGOPx(defop)->op_first;
|
H A D | util.c | 1527 for (kid = cUNOPo->op_first; kid; kid = OpSIBLING(kid)) { in Perl_closest_cop()
|
H A D | toke.c | 12743 OP *prev = cLISTOPx(attrlist)->op_first; in Perl_apply_builtin_cv_attributes() 12760 if(OpHAS_SIBLING(cLISTOPx(attrlist)->op_first)) in Perl_apply_builtin_cv_attributes()
|
H A D | pp.c | 278 if (cUNOP->op_first->op_type == OP_NULL) in PP()
|
/openbsd/gnu/usr.bin/perl/ext/XS-APItest/ |
H A D | APItest.xs | 550 OP *aop = cUNOPx(entersubop)->op_first; in THX_ck_entersub_args_scalars() 554 aop = cUNOPx(aop)->op_first; in THX_ck_entersub_args_scalars() 571 pushop = cUNOPx(pushop)->op_first; in THX_ck_entersub_multi_sum() 711 pushop = cUNOPx(entersubop)->op_first; in THX_ck_entersub_establish_cleanup() 714 pushop = cUNOPx(pushop)->op_first; in THX_ck_entersub_establish_cleanup() 733 pushop = cUNOPx(entersubop)->op_first; in THX_ck_entersub_postinc() 736 pushop = cUNOPx(pushop)->op_first; in THX_ck_entersub_postinc() 752 pushop = cUNOPx(entersubop)->op_first; in THX_ck_entersub_pad_scalar() 754 pushop = cUNOPx(pushop)->op_first; in THX_ck_entersub_pad_scalar() 1126 listop = cUNOPx(sigop)->op_first; in THX_parse_keyword_subsignature() [all …]
|
/openbsd/gnu/usr.bin/perl/ext/Devel-Peek/ |
H A D | Peek.xs | 361 pm = cUNOPx(entersubop)->op_first; in S_ck_dump() 364 pm = cUNOPx(pm)->op_first; in S_ck_dump()
|
/openbsd/gnu/usr.bin/perl/ext/B/ |
H A D | B.xs | 396 for (kid = ((UNOP*)o)->op_first; kid; kid = OpSIBLING(kid)) { in walkoptree() 422 OP *kid = OpSIBLING(cLISTOPo->op_first); /* pass pushmark */ in oplist() 423 kid = kUNOP->op_first; /* pass rv2gv */ in oplist() 424 kid = kUNOP->op_first; /* pass leave */ in oplist() 533 { STR_WITH_LEN("first"), OPp, STRUCT_OFFSET(struct unop, op_first), },/* 5*/ 960 for (kid = ((LISTOP*)o)->op_first; kid; kid = OpSIBLING(kid)) 1074 ? cMETHOPo->op_u.op_first : NULL);
|
/openbsd/gnu/usr.bin/perl/pod/ |
H A D | perlinterp.pod | 739 7 OP *kid = cLISTOPo->op_first;
|
H A D | perlguts.pod | 2474 C<op_first> field. Binary operators (C<BINOP>s) have not only an 2475 C<op_first> field but also an C<op_last> field. The most complex type of 2477 first child is pointed to by C<op_first> and the last child by 2500 follow C<op_first> and then the C<OpSIBLING> chain itself to find the
|
H A D | perl5220delta.pod | 2678 parent at the same time (I<e.g.> by updating C<op_first> and C<op_last> where
|