Home
last modified time | relevance | path

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

/mirbsd/src/gnu/usr.bin/perl/
Dop.h362 #define cSVOPx(o) ((SVOP*)o) macro
373 #define cSVOP cSVOPx(PL_op)
384 #define cSVOPo cSVOPx(o)
395 #define kSVOP cSVOPx(kid)
406 # define cSVOPx_sv(v) (cSVOPx(v)->op_sv \
407 ? cSVOPx(v)->op_sv : PAD_SVl((v)->op_targ))
408 # define cSVOPx_svp(v) (cSVOPx(v)->op_sv \
409 ? &cSVOPx(v)->op_sv : &PAD_SVl((v)->op_targ))
411 # define cGVOPx_gv(o) ((GV*)cSVOPx(o)->op_sv)
414 # define cSVOPx_sv(v) (cSVOPx(v)->op_sv)
[all …]
Dop.c1062 PL_compiling.cop_arybase = (I32)SvIV(cSVOPx(PL_eval_start)->op_sv); in Perl_mod()
1832 cSVOPx(right)->op_private & OPpCONST_BARE && in Perl_bind_match()
1833 cSVOPx(right)->op_private & OPpCONST_STRICT) in Perl_bind_match()
3402 pm->op_pmreplroot = (OP*)cSVOPx(tmpop)->op_sv; in Perl_newASSIGNOP()
3403 cSVOPx(tmpop)->op_sv = Nullsv; /* steal it */ in Perl_newASSIGNOP()
6583 if (cSVOPx(pop)->op_private & OPpCONST_STRICT) in Perl_peep()
Dtoke.c1071 ver = cSVOPx(version)->op_sv; in S_force_version()