Home
last modified time | relevance | path

Searched refs:blk_oldcop (Results 1 – 25 of 56) sorted by relevance

123

/dports/devel/p5-B-Utils/B-Utils-0.27/
H A DOP.xs71 if (cop_p) *cop_p = ccstack[cxix].blk_oldcop; in BUtils_op_upcontext()
109 return (OP*) cx->blk_oldcop; in BUtils_find_oldcop()
/dports/devel/p5-Scope-Upper/Scope-Upper-0.32/
H A DUpper.xs917 PL_curcop = CX_CUR()->blk_oldcop; in su_localize()
931 CX_CUR()->blk_oldcop = old_cop; in su_localize()
1433 && (prev->blk_oldcop == cx->blk_oldcop)) { in su_yield()
2197 SU_UPLEVEL_SAVE(curcop, cx->blk_oldcop); in su_uplevel_old()
2451 if (cx->blk_oldcop && CopSTASH(cx->blk_oldcop) == GvSTASH(PL_DBgv)) in su_context_skip_db()
2547 if (cx->blk_oldcop == prev->blk_oldcop) in su_context_normalize_up()
2551 if (cx->blk_oldcop && OpSIBLING(cx->blk_oldcop) in su_context_normalize_up()
2583 if (cx->blk_oldcop == next->blk_oldcop) in su_context_normalize_down()
2587 if (next->blk_oldcop && OpSIBLING(next->blk_oldcop) in su_context_normalize_down()
2622 const COP *cop = cx->blk_oldcop; in su_context_gimme()
[all …]
/dports/devel/p5-Devel-Caller/Devel-Caller-2.06/
H A DCaller.xs31 OP *op = cx->blk_oldcop->op_next;
/dports/lang/perl5.34/perl-5.34.0/
H A Dpp_ctl.c1952 assert(CopSTASH(cx->blk_oldcop)); in PP()
1978 lcop = closest_cop(cx->blk_oldcop, OpSIBLING(cx->blk_oldcop), in PP()
1981 lcop = cx->blk_oldcop; in PP()
2052 mPUSHi(CopHINTS_get(cx->blk_oldcop)); in PP()
2070 PUSHs(cx->blk_oldcop->cop_hints_hash ? in PP()
2674 PL_curcop = cx->blk_oldcop; in PP()
2695 PL_curcop = cx->blk_oldcop; in PP()
2981 PL_curcop = cx->blk_oldcop; in PP()
3011 PL_curcop = cx->blk_oldcop; in PP()
4591 PL_curcop = cx->blk_oldcop; in PP()
[all …]
H A Dcop.h872 #define CxLABEL(c) (0 + CopLABEL((c)->blk_oldcop))
873 #define CxLABEL_len(c,len) (0 + CopLABEL_len((c)->blk_oldcop, len))
874 #define CxLABEL_len_flags(c,len,flags) (0 + CopLABEL_len_flags((c)->blk_oldcop, len, flags))
923 #define blk_oldcop cx_u.cx_blk.blku_oldcop macro
/dports/lang/perl5.30/perl-5.30.3/
H A Dpp_ctl.c1918 assert(CopSTASH(cx->blk_oldcop)); in PP()
1944 lcop = closest_cop(cx->blk_oldcop, OpSIBLING(cx->blk_oldcop), in PP()
1947 lcop = cx->blk_oldcop; in PP()
2018 mPUSHi(CopHINTS_get(cx->blk_oldcop)); in PP()
2640 PL_curcop = cx->blk_oldcop; in PP()
2661 PL_curcop = cx->blk_oldcop; in PP()
2974 PL_curcop = cx->blk_oldcop; in PP()
3060 gotoprobe = OpSIBLING(cx->blk_oldcop); in PP()
3323 *db_seqp = cx->blk_oldcop->cop_seq; in Perl_find_runcv_where()
4561 PL_curcop = cx->blk_oldcop; in PP()
[all …]
H A Dcop.h704 #define CxLABEL(c) (0 + CopLABEL((c)->blk_oldcop))
705 #define CxLABEL_len(c,len) (0 + CopLABEL_len((c)->blk_oldcop, len))
706 #define CxLABEL_len_flags(c,len,flags) (0 + CopLABEL_len_flags((c)->blk_oldcop, len, flags))
755 #define blk_oldcop cx_u.cx_blk.blku_oldcop macro
H A Dinline.h1985 cx->blk_oldcop = PL_curcop; in S_cx_pushblock()
2015 PL_curcop = cx->blk_oldcop; in S_cx_popblock()
/dports/lang/perl5.32/perl-5.32.1/
H A Dpp_ctl.c1937 assert(CopSTASH(cx->blk_oldcop)); in PP()
1963 lcop = closest_cop(cx->blk_oldcop, OpSIBLING(cx->blk_oldcop), in PP()
1966 lcop = cx->blk_oldcop; in PP()
2037 mPUSHi(CopHINTS_get(cx->blk_oldcop)); in PP()
2659 PL_curcop = cx->blk_oldcop; in PP()
2680 PL_curcop = cx->blk_oldcop; in PP()
2996 PL_curcop = cx->blk_oldcop; in PP()
3082 gotoprobe = OpSIBLING(cx->blk_oldcop); in PP()
3345 *db_seqp = cx->blk_oldcop->cop_seq; in Perl_find_runcv_where()
4588 PL_curcop = cx->blk_oldcop; in PP()
[all …]
H A Dcop.h734 #define CxLABEL(c) (0 + CopLABEL((c)->blk_oldcop))
735 #define CxLABEL_len(c,len) (0 + CopLABEL_len((c)->blk_oldcop, len))
736 #define CxLABEL_len_flags(c,len,flags) (0 + CopLABEL_len_flags((c)->blk_oldcop, len, flags))
785 #define blk_oldcop cx_u.cx_blk.blku_oldcop macro
H A Dinline.h2102 cx->blk_oldcop = PL_curcop; in Perl_cx_pushblock()
2132 PL_curcop = cx->blk_oldcop; in Perl_cx_popblock()
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/
H A Dpp_ctl.c1952 assert(CopSTASH(cx->blk_oldcop)); in PP()
1978 lcop = closest_cop(cx->blk_oldcop, OpSIBLING(cx->blk_oldcop), in PP()
1981 lcop = cx->blk_oldcop; in PP()
2052 mPUSHi(CopHINTS_get(cx->blk_oldcop)); in PP()
2070 PUSHs(cx->blk_oldcop->cop_hints_hash ? in PP()
2687 PL_curcop = cx->blk_oldcop; in PP()
2708 PL_curcop = cx->blk_oldcop; in PP()
3000 PL_curcop = cx->blk_oldcop; in PP()
3030 PL_curcop = cx->blk_oldcop; in PP()
4612 PL_curcop = cx->blk_oldcop; in PP()
[all …]
H A Dcop.h863 #define CxLABEL(c) (0 + CopLABEL((c)->blk_oldcop))
864 #define CxLABEL_len(c,len) (0 + CopLABEL_len((c)->blk_oldcop, len))
865 #define CxLABEL_len_flags(c,len,flags) (0 + CopLABEL_len_flags((c)->blk_oldcop, len, flags))
914 #define blk_oldcop cx_u.cx_blk.blku_oldcop macro
/dports/devel/p5-PadWalker/PadWalker-2.5/
H A DPadWalker.xs56 cxtype_name(CxTYPE(&cxstack[i])), cxstack[i].blk_oldcop->cop_seq); in show_cxstack()
168 if (cop_p) *cop_p = ccstack[cxix].blk_oldcop; in upcontext()
368 context_vars(aTHX_ 0, my_hash, our_hash, ccstack[i].blk_oldcop->cop_seq, in do_peek()
/dports/lang/perl5.30/perl-5.30.3/dist/Devel-PPPort/parts/inc/
H A Dcop156 pv = CopSTASHPV(cx->blk_oldcop);
161 pv = CopSTASHPV(dbcx->blk_oldcop);
/dports/lang/perl5.34/perl-5.34.0/dist/Devel-PPPort/parts/inc/
H A Dcop156 pv = CopSTASHPV(cx->blk_oldcop);
161 pv = CopSTASHPV(dbcx->blk_oldcop);
/dports/lang/perl5.32/perl-5.32.1/dist/Devel-PPPort/parts/inc/
H A Dcop156 pv = CopSTASHPV(cx->blk_oldcop);
161 pv = CopSTASHPV(dbcx->blk_oldcop);
/dports/devel/p5-Devel-PPPort/Devel-PPPort-3.63/parts/inc/
H A Dcop156 pv = CopSTASHPV(cx->blk_oldcop);
161 pv = CopSTASHPV(dbcx->blk_oldcop);
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/dist/Devel-PPPort/parts/inc/
H A Dcop156 pv = CopSTASHPV(cx->blk_oldcop);
161 pv = CopSTASHPV(dbcx->blk_oldcop);
/dports/devel/p5-Want/Want-0.29/
H A DWant.xs164 debugger_trouble = (cx->blk_oldcop->op_type == OP_DBSTATE); in upcontext_plus()
335 return (OP*) cx->blk_oldcop; in find_start_cop()
/dports/math/polymake/polymake-4.5/lib/core/include/perl/
H A DExt.h148 return skip_debug_cx && CopSTASH_eq(cx->blk_oldcop, PL_debstash); in skip_debug_frame()
/dports/devel/p5-Devel-MAT-Dumper/Devel-MAT-Dumper-0.42/lib/Devel/MAT/
H A DDumper.xs1270 COP *oldcop = cx->blk_oldcop; in dumpfh()
1288 COP *oldcop = cx->blk_oldcop; in dumpfh()
/dports/lang/perl5.30/perl-5.30.3/ext/XS-APItest/
H A DAPItest.xs2922 pv = CopSTASHPV(cx->blk_oldcop);
2927 pv = CopSTASHPV(dbcx->blk_oldcop);
2932 ST(4) = cop_hints_fetch_pvs(cx->blk_oldcop, "foo", 0);
2933 ST(5) = cop_hints_fetch_pvn(cx->blk_oldcop, "foo", 3, 0, 0);
2934 ST(6) = cop_hints_fetch_sv(cx->blk_oldcop,
2937 hv = cop_hints_2hv(cx->blk_oldcop, 0);
/dports/lang/perl5.34/perl-5.34.0/ext/XS-APItest/
H A DAPItest.xs3012 pv = CopSTASHPV(cx->blk_oldcop);
3017 pv = CopSTASHPV(dbcx->blk_oldcop);
3022 ST(4) = cop_hints_fetch_pvs(cx->blk_oldcop, "foo", 0);
3023 ST(5) = cop_hints_fetch_pvn(cx->blk_oldcop, "foo", 3, 0, 0);
3024 ST(6) = cop_hints_fetch_sv(cx->blk_oldcop,
3027 hv = cop_hints_2hv(cx->blk_oldcop, 0);
/dports/lang/perl5.32/perl-5.32.1/ext/XS-APItest/
H A DAPItest.xs2994 pv = CopSTASHPV(cx->blk_oldcop);
2999 pv = CopSTASHPV(dbcx->blk_oldcop);
3004 ST(4) = cop_hints_fetch_pvs(cx->blk_oldcop, "foo", 0);
3005 ST(5) = cop_hints_fetch_pvn(cx->blk_oldcop, "foo", 3, 0, 0);
3006 ST(6) = cop_hints_fetch_sv(cx->blk_oldcop,
3009 hv = cop_hints_2hv(cx->blk_oldcop, 0);

123