Home
last modified time | relevance | path

Searched refs:cxix (Results 1 – 25 of 140) sorted by relevance

123456

/dports/devel/p5-Scope-Upper/Scope-Upper-0.32/
H A DUpper.xs1684 for (cxix = cxstack_ix; cxix >= 0; --cxix) { in su_uplevel_goto_runops()
2077 sud->cxix = cxix; in su_uplevel_new()
2148 sud->cxix = cxix; in su_uplevel_old()
2822 XSH_CXT.yield_storage.cxix = cxix; in XS()
2904 cxix = su_context_skip_db(cxix);
2922 for (; cxix >= 0; --cxix) {
2946 for (; cxix >= 0; --cxix) {
2974 cxix = su_context_skip_db(cxix);
2989 for (cxix = cxstack_ix; cxix > 0; --cxix) {
3006 cxix = su_context_real2logical(cxix);
[all …]
/dports/devel/p5-B-Utils/B-Utils-0.27/
H A DOP.xs45 I32 cxix = BUtils_dopoptosub(aTHX_ cxstack_ix); in BUtils_op_upcontext() local
49 if (cxix_to_p) *cxix_to_p = cxix; in BUtils_op_upcontext()
52 while (cxix < 0 && top_si->si_type != PERLSI_MAIN) { in BUtils_op_upcontext()
57 if (cxix_to_p) *cxix_to_p = cxix; in BUtils_op_upcontext()
59 if (cxix < 0 && count == 0) { in BUtils_op_upcontext()
63 else if (cxix < 0) in BUtils_op_upcontext()
65 if (PL_DBsub && cxix >= 0 && in BUtils_op_upcontext()
71 if (cop_p) *cop_p = ccstack[cxix].blk_oldcop; in BUtils_op_upcontext()
72 cxix = BUtils_dopoptosub_at(aTHX_ ccstack, cxix - 1); in BUtils_op_upcontext()
74 if (cxix_to_p) *cxix_to_p = cxix; in BUtils_op_upcontext()
[all …]
/dports/devel/p5-Want/Want-0.29/
H A DWant.xs84 if (cxix < 0) { in upcontext()
87 if (PL_DBsub && cxix >= 0 && in upcontext()
92 cxix = dopoptosub_at(aTHX_ ccstack, cxix - 1); in upcontext()
94 cx = &ccstack[cxix]; in upcontext()
141 if (cxix < 0) { in upcontext_plus()
149 cxix = dopoptosub_at(aTHX_ ccstack, cxix - 1); in upcontext_plus()
151 cx = &ccstack[cxix]; in upcontext_plus()
158 cxix = dbcxix; in upcontext_plus()
159 cx = &ccstack[cxix]; in upcontext_plus()
166 for (i = cxix-1; i>=0 ; i--) { in upcontext_plus()
[all …]
/dports/lang/perl5.34/perl-5.34.0/ext/File-DosGlob/lib/File/
H A DDosGlob.pm116 my($pat,$cxix) = ($_[0], _callsite());
123 if (!$entries{$cxix}) {
174 $entries{$cxix} = [doglob(1,@pat)];
179 return @{delete $entries{$cxix}};
182 if (scalar @{$entries{$cxix}}) {
183 return shift @{$entries{$cxix}};
187 delete $entries{$cxix};
/dports/lang/perl5.32/perl-5.32.1/ext/File-DosGlob/lib/File/
H A DDosGlob.pm116 my($pat,$cxix) = ($_[0], _callsite());
123 if (!$entries{$cxix}) {
174 $entries{$cxix} = [doglob(1,@pat)];
179 return @{delete $entries{$cxix}};
182 if (scalar @{$entries{$cxix}}) {
183 return shift @{$entries{$cxix}};
187 delete $entries{$cxix};
/dports/lang/perl5.30/perl-5.30.3/ext/File-DosGlob/lib/File/
H A DDosGlob.pm116 my($pat,$cxix) = ($_[0], _callsite());
123 if (!$entries{$cxix}) {
174 $entries{$cxix} = [doglob(1,@pat)];
179 return @{delete $entries{$cxix}};
182 if (scalar @{$entries{$cxix}}) {
183 return shift @{$entries{$cxix}};
187 delete $entries{$cxix};
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/ext/File-DosGlob/lib/File/
H A DDosGlob.pm116 my($pat,$cxix) = ($_[0], _callsite());
123 if (!$entries{$cxix}) {
174 $entries{$cxix} = [doglob(1,@pat)];
179 return @{delete $entries{$cxix}};
182 if (scalar @{$entries{$cxix}}) {
183 return shift @{$entries{$cxix}};
187 delete $entries{$cxix};
/dports/lang/perl5.34/perl-5.34.0/ext/mro/
H A Dmro.xs476 I32 cxix = cxstack_ix; variable
513 cxix = __dopoptosub_at(ccstack, cxix);
519 while (cxix < 0) {
524 cxix = __dopoptosub_at(ccstack, top_si->si_cxix);
527 if(CxTYPE((PERL_CONTEXT*)(&ccstack[cxix])) != CXt_SUB
529 cxix = __dopoptosub_at(ccstack, cxix - 1);
537 cxix = dbcxix;
543 cvgv = CvGV(ccstack[cxix].blk_sub.cv);
546 cxix = __dopoptosub_at(ccstack, cxix - 1);
571 cxix = __dopoptosub_at(ccstack, cxix - 1);
[all …]
/dports/lang/perl5.30/perl-5.30.3/ext/mro/
H A Dmro.xs475 I32 cxix = cxstack_ix; variable
512 cxix = __dopoptosub_at(ccstack, cxix);
518 while (cxix < 0) {
523 cxix = __dopoptosub_at(ccstack, top_si->si_cxix);
526 if(CxTYPE((PERL_CONTEXT*)(&ccstack[cxix])) != CXt_SUB
528 cxix = __dopoptosub_at(ccstack, cxix - 1);
536 cxix = dbcxix;
542 cvgv = CvGV(ccstack[cxix].blk_sub.cv);
545 cxix = __dopoptosub_at(ccstack, cxix - 1);
570 cxix = __dopoptosub_at(ccstack, cxix - 1);
[all …]
/dports/lang/perl5.32/perl-5.32.1/ext/mro/
H A Dmro.xs475 I32 cxix = cxstack_ix; variable
512 cxix = __dopoptosub_at(ccstack, cxix);
518 while (cxix < 0) {
523 cxix = __dopoptosub_at(ccstack, top_si->si_cxix);
526 if(CxTYPE((PERL_CONTEXT*)(&ccstack[cxix])) != CXt_SUB
528 cxix = __dopoptosub_at(ccstack, cxix - 1);
536 cxix = dbcxix;
542 cvgv = CvGV(ccstack[cxix].blk_sub.cv);
545 cxix = __dopoptosub_at(ccstack, cxix - 1);
570 cxix = __dopoptosub_at(ccstack, cxix - 1);
[all …]
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/ext/mro/
H A Dmro.xs467 I32 cxix = cxstack_ix; variable
504 cxix = __dopoptosub_at(ccstack, cxix);
510 while (cxix < 0) {
515 cxix = __dopoptosub_at(ccstack, top_si->si_cxix);
518 if(CxTYPE((PERL_CONTEXT*)(&ccstack[cxix])) != CXt_SUB
520 cxix = __dopoptosub_at(ccstack, cxix - 1);
528 cxix = dbcxix;
534 cvgv = CvGV(ccstack[cxix].blk_sub.cv);
537 cxix = __dopoptosub_at(ccstack, cxix - 1);
562 cxix = __dopoptosub_at(ccstack, cxix - 1);
[all …]
/dports/devel/p5-Class-C3-XS/Class-C3-XS-0.15/
H A DXS.xs339 register I32 cxix = cxstack_ix; in XS() local
381 cxix = __dopoptosub_at(ccstack, cxix); in XS()
384 while (cxix < 0) { in XS()
389 cxix = __dopoptosub_at(ccstack, top_si->si_cxix); in XS()
392 if(CxTYPE((PERL_CONTEXT*)(&ccstack[cxix])) != CXt_SUB in XS()
394 cxix = __dopoptosub_at(ccstack, cxix - 1); in XS()
402 cxix = dbcxix; in XS()
408 cvgv = CvGV(ccstack[cxix].blk_sub.cv); in XS()
411 cxix = __dopoptosub_at(ccstack, cxix - 1); in XS()
436 cxix = __dopoptosub_at(ccstack, cxix - 1); in XS()
[all …]
/dports/lang/perl5.30/perl-5.30.3/dist/Devel-PPPort/parts/inc/
H A Dcop79 register I32 cxix = DPPP_dopoptosub_at(cxstack, cxstack_ix);
86 while (cxix < 0 && top_si->si_type != PERLSI_MAIN) {
89 cxix = DPPP_dopoptosub_at(ccstack, top_si->si_cxix);
91 if (cxix < 0)
94 if (PL_DBsub && GvCV(PL_DBsub) && cxix >= 0 &&
95 ccstack[cxix].blk_sub.cv == GvCV(PL_DBsub))
99 cxix = DPPP_dopoptosub_at(ccstack, cxix - 1);
102 cx = &ccstack[cxix];
106 const I32 dbcxix = DPPP_dopoptosub_at(ccstack, cxix - 1);
/dports/lang/perl5.34/perl-5.34.0/dist/Devel-PPPort/parts/inc/
H A Dcop79 I32 cxix = DPPP_dopoptosub_at(cxstack, cxstack_ix);
86 while (cxix < 0 && top_si->si_type != PERLSI_MAIN) {
89 cxix = DPPP_dopoptosub_at(ccstack, top_si->si_cxix);
91 if (cxix < 0)
94 if (PL_DBsub && GvCV(PL_DBsub) && cxix >= 0 &&
95 ccstack[cxix].blk_sub.cv == GvCV(PL_DBsub))
99 cxix = DPPP_dopoptosub_at(ccstack, cxix - 1);
102 cx = &ccstack[cxix];
106 const I32 dbcxix = DPPP_dopoptosub_at(ccstack, cxix - 1);
/dports/lang/perl5.32/perl-5.32.1/dist/Devel-PPPort/parts/inc/
H A Dcop79 register I32 cxix = DPPP_dopoptosub_at(cxstack, cxstack_ix);
86 while (cxix < 0 && top_si->si_type != PERLSI_MAIN) {
89 cxix = DPPP_dopoptosub_at(ccstack, top_si->si_cxix);
91 if (cxix < 0)
94 if (PL_DBsub && GvCV(PL_DBsub) && cxix >= 0 &&
95 ccstack[cxix].blk_sub.cv == GvCV(PL_DBsub))
99 cxix = DPPP_dopoptosub_at(ccstack, cxix - 1);
102 cx = &ccstack[cxix];
106 const I32 dbcxix = DPPP_dopoptosub_at(ccstack, cxix - 1);
/dports/devel/p5-Devel-PPPort/Devel-PPPort-3.63/parts/inc/
H A Dcop79 I32 cxix = DPPP_dopoptosub_at(cxstack, cxstack_ix);
86 while (cxix < 0 && top_si->si_type != PERLSI_MAIN) {
89 cxix = DPPP_dopoptosub_at(ccstack, top_si->si_cxix);
91 if (cxix < 0)
94 if (PL_DBsub && GvCV(PL_DBsub) && cxix >= 0 &&
95 ccstack[cxix].blk_sub.cv == GvCV(PL_DBsub))
99 cxix = DPPP_dopoptosub_at(ccstack, cxix - 1);
102 cx = &ccstack[cxix];
106 const I32 dbcxix = DPPP_dopoptosub_at(ccstack, cxix - 1);
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/dist/Devel-PPPort/parts/inc/
H A Dcop79 I32 cxix = DPPP_dopoptosub_at(cxstack, cxstack_ix);
86 while (cxix < 0 && top_si->si_type != PERLSI_MAIN) {
89 cxix = DPPP_dopoptosub_at(ccstack, top_si->si_cxix);
91 if (cxix < 0)
94 if (PL_DBsub && GvCV(PL_DBsub) && cxix >= 0 &&
95 ccstack[cxix].blk_sub.cv == GvCV(PL_DBsub))
99 cxix = DPPP_dopoptosub_at(ccstack, cxix - 1);
102 cx = &ccstack[cxix];
106 const I32 dbcxix = DPPP_dopoptosub_at(ccstack, cxix - 1);
/dports/devel/p5-PadWalker/PadWalker-2.5/
H A DPadWalker.xs142 I32 cxix = dopoptosub(aTHX_ cxstack_ix); in upcontext() local
146 if (cxix_to_p) *cxix_to_p = cxix; in upcontext()
154 if (cxix_to_p) *cxix_to_p = cxix; in upcontext()
156 if (cxix < 0 && count == 0) { in upcontext()
160 else if (cxix < 0) in upcontext()
162 if (PL_DBsub && cxix >= 0 && in upcontext()
163 ccstack[cxix].blk_sub.cv == GvCV(PL_DBsub)) in upcontext()
168 if (cop_p) *cop_p = ccstack[cxix].blk_oldcop; in upcontext()
169 cxix = dopoptosub_at(aTHX_ ccstack, cxix - 1); in upcontext()
171 if (cxix_to_p) *cxix_to_p = cxix; in upcontext()
[all …]
/dports/devel/p5-B-C/B-C-1.57/lib/B/
H A DCC.pm961 while ( $cxix >= 0 && CxTYPE_no_LOOP( $cxstack[$cxix] ) ) {
962 $cxix--;
965 return $cxix;
972 $cxix >= 0
977 $cxix--;
988 return $cxix;
2877 my $cxix;
2898 if (!$cxstack[$cxix]->{'nextop'} or !$cxstack[$cxix]->{'label'}) {
2916 my $cxix;
2954 my $cxix;
[all …]
/dports/devel/p5-Syntax-Keyword-Try/Syntax-Keyword-Try-0.26/lib/Syntax/Keyword/
H A DTry.xs43 I32 cxix; in pp_returnintry() local
45 for (cxix = cxstack_ix; cxix; cxix--) { in pp_returnintry()
46 if(CxTYPE(&cxstack[cxix]) == CXt_SUB) in pp_returnintry()
49 if(CxTYPE(&cxstack[cxix]) == CXt_EVAL && CxTRYBLOCK(&cxstack[cxix])) { in pp_returnintry()
55 OP *retop = cxstack[cxix].blk_eval.retop; in pp_returnintry()
67 if(!cxix) in pp_returnintry()
70 I32 gimme = cxstack[cxix].blk_gimme; in pp_returnintry()
107 dounwind(cxix); in pp_returnintry()
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/
H A Dpp_ctl.c51 I32 cxix; in PP() local
60 if (cxix < 0) in PP()
1403 if (cxix < 0) in Perl_block_gimme()
1726 I32 cxix; in Perl_die_unwind() local
1907 cxix = dopoptosub_at(ccstack, cxix - 1); in Perl_caller_cx()
2606 I32 cxix; in S_unwind_loop() local
5370 I32 cxix; in PP() local
5380 if (cxix < 0) in PP()
5414 I32 cxix; in PP() local
5439 I32 cxix; in PP() local
[all …]
/dports/devel/p5-Data-Clone/Data-Clone-0.004/
H A DData-Clone.xs128 I32 cxix = my_dopoptosub_at(aTHX_ ccstack, cxstack_ix); in caller_cv() local
133 while (cxix < 0 && si->si_type != PERLSI_MAIN) { in caller_cv()
136 cxix = my_dopoptosub_at(aTHX_ ccstack, si->si_cxix); in caller_cv()
138 if (cxix < 0) { in caller_cv()
143 ccstack[cxix].blk_sub.cv == GvCV(PL_DBsub)) in caller_cv()
148 cxix = my_dopoptosub_at(aTHX_ ccstack, cxix - 1); in caller_cv()
151 cx = &ccstack[cxix]; in caller_cv()
/dports/lang/perl5.34/perl-5.34.0/
H A Dpp_ctl.c51 I32 cxix; in PP() local
60 if (cxix < 0) in PP()
1402 if (cxix < 0) in Perl_block_gimme()
1726 I32 cxix; in Perl_die_unwind() local
1907 cxix = dopoptosub_at(ccstack, cxix - 1); in Perl_caller_cx()
2600 I32 cxix; in S_unwind_loop() local
5349 I32 cxix; in PP() local
5359 if (cxix < 0) in PP()
5393 I32 cxix; in PP() local
5418 I32 cxix; in PP() local
[all …]
/dports/lang/perl5.30/perl-5.30.3/
H A Dpp_ctl.c45 I32 cxix; in PP() local
54 if (cxix < 0) in PP()
1702 I32 cxix; in Perl_die_unwind() local
1865 if (cxix < 0) in Perl_caller_cx()
1873 cxix = dopoptosub_at(ccstack, cxix - 1); in Perl_caller_cx()
2566 I32 cxix; in S_unwind_loop() local
2569 if (cxix < 0) in S_unwind_loop()
2587 if (cxix < 0) in S_unwind_loop()
5262 I32 cxix; in PP() local
5306 I32 cxix; in PP() local
[all …]
/dports/lang/perl5.32/perl-5.32.1/
H A Dpp_ctl.c51 I32 cxix; in PP() local
60 if (cxix < 0) in PP()
1711 I32 cxix; in Perl_die_unwind() local
1884 if (cxix < 0) in Perl_caller_cx()
1892 cxix = dopoptosub_at(ccstack, cxix - 1); in Perl_caller_cx()
2585 I32 cxix; in S_unwind_loop() local
2588 if (cxix < 0) in S_unwind_loop()
2606 if (cxix < 0) in S_unwind_loop()
5289 I32 cxix; in PP() local
5333 I32 cxix; in PP() local
[all …]

123456