/dports/devel/p5-B-Utils/B-Utils-0.27/ |
H A D | OP.xs | 71 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 D | Upper.xs | 917 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 D | Caller.xs | 31 OP *op = cx->blk_oldcop->op_next;
|
/dports/lang/perl5.34/perl-5.34.0/ |
H A D | pp_ctl.c | 1952 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 D | cop.h | 872 #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 D | pp_ctl.c | 1918 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 D | cop.h | 704 #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 D | inline.h | 1985 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 D | pp_ctl.c | 1937 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 D | cop.h | 734 #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 D | inline.h | 2102 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 D | pp_ctl.c | 1952 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 D | cop.h | 863 #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 D | PadWalker.xs | 56 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 D | cop | 156 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 D | cop | 156 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 D | cop | 156 pv = CopSTASHPV(cx->blk_oldcop); 161 pv = CopSTASHPV(dbcx->blk_oldcop);
|
/dports/devel/p5-Devel-PPPort/Devel-PPPort-3.63/parts/inc/ |
H A D | cop | 156 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 D | cop | 156 pv = CopSTASHPV(cx->blk_oldcop); 161 pv = CopSTASHPV(dbcx->blk_oldcop);
|
/dports/devel/p5-Want/Want-0.29/ |
H A D | Want.xs | 164 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 D | Ext.h | 148 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 D | Dumper.xs | 1270 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 D | APItest.xs | 2922 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 D | APItest.xs | 3012 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 D | APItest.xs | 2994 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);
|