Home
last modified time | relevance | path

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

/openbsd/gnu/usr.bin/perl/cpan/Scalar-List-Utils/
H A Dmulticall.h132 SAVESPTR(CvROOT(multicall_cv)->op_ppaddr); \
133 CvROOT(multicall_cv)->op_ppaddr = PL_ppaddr[OP_NULL]; \
H A DListUtil.xs253 if(!CvROOT(cv) && !CvXSUB(cv)) in MY_sv_to_cv()
/openbsd/gnu/usr.bin/perl/
H A Dpad.c328 if(CvROOT(&cvbody)) { in Perl_cv_undef_flags()
338 if (CvSLABBED(&cvbody)) OpslabREFCNT_dec_padok(OpSLAB(CvROOT(&cvbody))); in Perl_cv_undef_flags()
339 op_free(CvROOT(&cvbody)); in Perl_cv_undef_flags()
340 CvROOT(&cvbody) = NULL; in Perl_cv_undef_flags()
517 if (CvROOT(cv)) slab = OpSLAB(CvROOT(cv)); in Perl_cv_forget_slab()
1083 #define CvCOMPILED(cv) CvROOT(cv)
2180 cUNOPx(cUNOPx(CvROOT(cv))->op_first)->op_first in S_cv_clone_pad()
2243 CvROOT(cv) = OpREFCNT_inc(CvROOT(proto)); in S_cv_clone()
H A Ddump.c812 if (justperl && (CvISXSUB(cv) || !CvROOT(cv))) in Perl_dump_sub_perl()
831 else if (CvROOT(cv)) in Perl_dump_sub_perl()
832 op_dump(CvROOT(cv)); in Perl_dump_sub_perl()
855 if (CvROOT(GvFORM(gv))) in Perl_dump_form()
856 op_dump(CvROOT(GvFORM(gv))); in Perl_dump_form()
2435 PTR2UV(CvROOT(sv))); in Perl_do_sv_dump()
2436 if (CvROOT(sv) && dumpops) { in Perl_do_sv_dump()
2437 do_op_dump(level+1, file, CvROOT(sv)); in Perl_do_sv_dump()
H A Dcv.h44 #define CvROOT(sv) ((XPVCV*)MUTABLE_PTR(SvANY(sv)))->xcv_root_u.xcv_root macro
H A Dgv.c954 if (topgv && (GvREFCNT(topgv) == 1) && (CvROOT(cand_cv) || CvXSUB(cand_cv))) { in S_gv_fetchmeth_internal()
971 if (topgv && (GvREFCNT(topgv) == 1) && (CvROOT(cand_cv) || CvXSUB(cand_cv))) { in S_gv_fetchmeth_internal()
1072 if (!(CvROOT(cv) || CvXSUB(cv))) in Perl_gv_fetchmeth_pvn_autoload()
1264 if (!CvROOT(cv) && !CvXSUB(cv)) { in Perl_gv_fetchmethod_pvn_flags()
1368 if (!(CvROOT(cv) || CvXSUB(cv))) in Perl_gv_autoload_pvn()
H A Dop.c331 if (!PL_compcv || CvROOT(PL_compcv) in Perl_Slab_Alloc()
10159 const bool pureperl = !CvISXSUB(cv) && CvROOT(cv); in S_already_defined()
10327 const bool exists = CvROOT(cv) || CvXSUB(cv); in Perl_newMYSUB()
10359 assert(!CvROOT(cv) && !CvCONST(cv)); in Perl_newMYSUB()
10477 CvROOT(cv) = block; in Perl_newMYSUB()
10857 || (cv && CvLVALUE(cv) && !CvROOT(cv) && !CvXSUB(cv) in Perl_newATTRSUB_x()
10910 const bool exists = CvROOT(cv) || CvXSUB(cv); in Perl_newATTRSUB_x()
10937 assert(!CvROOT(cv) && !CvCONST(cv)); in Perl_newATTRSUB_x()
11091 CvROOT(cv) = block; in Perl_newATTRSUB_x()
11791 CvROOT(cv) = root; in Perl_newFORM()
[all …]
H A Dpp_sort.c771 else if (!(cv && CvROOT(cv))) { in PP()
H A Dpp_ctl.c2381 if (!cv || (!CvROOT(cv) && !CvXSUB(cv))) in PP()
3189 while (!CvROOT(cv) && !CvXSUB(cv)) { in PP()
3285 if (!CvROOT(cv) && !CvXSUB(cv)) { in PP()
3513 gotoprobe = CvROOT(cx->blk_sub.cv); in PP()
H A Dpp_hot.c1791 if (CvROOT(sv) || CvXSUB(sv)) in PP()
6267 assert((void*)&CvROOT(cv) == (void*)&CvXSUB(cv)); in PP()
6268 while (UNLIKELY(!CvROOT(cv))) { in PP()
H A Dmg.c3705 if (!cv || !CvROOT(cv)) { in Perl_perly_sighandler()
H A Dutil.c1745 if (cv && !CvDEPTH(cv) && (CvROOT(cv) || CvXSUB(cv))) { in Perl_invoke_exception_hook()
H A Dsv.c3999 (CvROOT(cv) || CvXSUB(cv)) && in Perl_gv_setref()
14918 CvROOT(dsv) = OpREFCNT_inc(CvROOT(dsv));
H A Dpp.c79 if (CvROOT(protocv)) { in PP()
/openbsd/gnu/usr.bin/perl/ext/attributes/
H A Dattributes.xs68 && CvROOT(MUTABLE_CV(sv)) in modify_SV_attributes()
/openbsd/gnu/usr.bin/perl/cpan/Socket/
H A DSocket.xs339 op_free(CvROOT(cv)); in my_CvCONST_off()
340 CvROOT(cv) = NULL; in my_CvCONST_off()
/openbsd/gnu/usr.bin/perl/ext/Devel-Peek/
H A DPeek.xs48 if (!CvROOT(cv)) { in DeadCode()
/openbsd/gnu/usr.bin/perl/ext/B/
H A DB.xs2049 : ix ? CvROOT(cv) : CvSTART(cv)));
/openbsd/gnu/usr.bin/perl/pod/
H A Dperlguts.pod5030 C<CvROOT> is not set, or by subtracting two pointers C<(2*sizeof(I32 *))> from
5031 C<CvROOT> when it is set. The alternative to this approach of sneaking the slab
5039 =for apidoc_item |OP *|CvROOT|CV * sv
5043 the slab. If C<CvROOT> is not set when the CV is freed or undeffed, it is
5054 avoids potential problems with C<CvROOT> being written over. There is code all
5055 over the place, both in core and on CPAN, that does things with C<CvROOT>, so
/openbsd/gnu/usr.bin/perl/ext/XS-APItest/
H A DAPItest.xs4590 CvROOT(PL_compcv) = (OP *)1; in test_newFOROP_without_slab()
4602 CvROOT(PL_compcv) = NULL; in test_newFOROP_without_slab()
/openbsd/gnu/usr.bin/perl/dist/Devel-PPPort/parts/base/
H A D5003007116 CvROOT # Z added by devel/scanprov