Searched refs:PL_curstack (Results 1 – 16 of 16) sorted by relevance
72 bool was_real = cBOOL(AvREAL(PL_curstack)); in Perl_runops_wrap()87 assert(!AvREIFY(PL_curstack)); in Perl_runops_wrap()88 AvREAL_on(PL_curstack); in Perl_runops_wrap()103 AV * old_curstack = PL_curstack; in Perl_runops_wrap()116 assert(AvREAL(PL_curstack)); in Perl_runops_wrap()122 AvREAL_off(PL_curstack); in Perl_runops_wrap()147 if (old_curstack == PL_curstack) in Perl_runops_wrap()
116 PTR2UV(PL_curstack), PTR2UV(PL_stack_base), in Perl_debstackptrs()121 PTR2UV(PL_mainstack), PTR2UV(AvARRAY(PL_curstack)), in Perl_debstackptrs()122 PTR2UV(PL_mainstack), PTR2UV(AvFILLp(PL_curstack)), in Perl_debstackptrs()123 PTR2UV(AvMAX(PL_curstack))); in Perl_debstackptrs()
190 if (av == PL_curstack) { /* Oops, grew stack (via av_store()?) */ in Perl_av_extend_guts()382 if (av == PL_curstack && key > PL_stack_sp - PL_stack_base) in Perl_av_store()
1129 return AvREAL(PL_curstack) && !PL_curstackinfo->si_stack_nonrc_base; in Perl_rpp_stack_is_rc()1161 assert(AvREAL(PL_curstack)); in Perl_rpp_is_lone()3990 AvFILLp(PL_curstack) = PL_stack_sp - PL_stack_base; in Perl_switch_argstack()3994 PL_curstack = to; in Perl_switch_argstack()
67 # define PL_curstack (vTHX->Icurstack) macro
642 PL_curstack = f; \
4522 PL_curstack = PL_curstackinfo->si_stack; in Perl_init_stacks()4523 PL_mainstack = PL_curstack; /* remember in case we switch stacks */ in Perl_init_stacks()4525 PL_stack_base = AvARRAY(PL_curstack); in Perl_init_stacks()4527 PL_stack_max = PL_stack_base + AvMAX(PL_curstack); in Perl_init_stacks()
1329 while (PL_curstack != s) { \
110 assert(AvREAL(PL_curstack)); in Perl_pp_wrap()134 assert(AvREAL(PL_curstack)); in Perl_pp_wrap()158 assert(AvREAL(PL_curstack)); in Perl_xs_wrap()
58 av_extend(PL_curstack, current + n + extra); in Perl_stack_grow()
16294 PL_curstack = av_dup(proto_perl->Icurstack, param);16298 PL_stack_base = AvARRAY(PL_curstack);16301 PL_stack_max = PL_stack_base + AvMAX(PL_curstack);
5058 assert(AvREAL(PL_curstack)); in Perl_filter_read()5069 assert(AvREAL(PL_curstack)); in Perl_filter_read()
463 assert(AvREAL(PL_curstack)); in PP()
406 PL_curstack # Z added by devel/scanprov
4250 assert(!AvREAL(PL_curstack));4254 assert(AvREAL(PL_curstack));
4500 !AvREAL(PL_curstack)4509 AvREAL(PL_curstack) && !PL_curstackinfo->si_stack_nonrc_base4517 AvREAL(PL_curstack) && PL_curstackinfo->si_stack_nonrc_base > 0