Searched refs:PL_curstack (Results 1 - 13 of 13) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Ddeb.c70 PTR2UV(PL_curstack), PTR2UV(PL_stack_base),
75 PTR2UV(PL_mainstack), PTR2UV(AvARRAY(PL_curstack)),
76 PTR2UV(PL_mainstack), PTR2UV(AvFILLp(PL_curstack)),
77 PTR2UV(AvMAX(PL_curstack)));
H A Dcop.h300 if (cx->blk_loop.iterary && cx->blk_loop.iterary != PL_curstack)\
561 SWITCHSTACK(PL_curstack,next->si_stack); \
578 SWITCHSTACK(PL_curstack,prev->si_stack); \
585 while (PL_curstack != s) { \
H A Dpp.h310 PL_curstack = t; \
H A Dscope.c56 av_extend(PL_curstack, (p - PL_stack_base) + (n) + 128);
58 av_extend(PL_curstack, (p - PL_stack_base) + (n) + 1);
H A Dav.c144 if (av == PL_curstack) { /* Oops, grew stack (via av_store()?) */
321 if (av == PL_curstack && key > PL_stack_sp - PL_stack_base)
H A Dperlapi.h747 #undef PL_curstack
748 #define PL_curstack (*Perl_Tcurstack_ptr(aTHX))
H A Dembedvar.h55 #define PL_curstack (vTHX->Tcurstack) macro
1164 #define PL_curstack (aTHX->Tcurstack) macro
1304 #define PL_Tcurstack PL_curstack
H A Dperl.c3948 PL_curstack = PL_curstackinfo->si_stack;
3949 PL_mainstack = PL_curstack; /* remember in case we switch stacks */
3951 PL_stack_base = AvARRAY(PL_curstack);
3953 PL_stack_max = PL_stack_base + AvMAX(PL_curstack);
H A Dpp_ctl.c1729 cx->blk_loop.iterary = PL_curstack;
1730 AvFILLp(PL_curstack) = SP - PL_stack_base;
1812 AvARRAY(PL_curstack)[1] = *SP;
H A Dpp.c4412 AV *oldstack = PL_curstack;
4465 SWITCHSTACK(PL_curstack, ary);
H A Dpp_hot.c1909 if (cx->blk_loop.iterix >= (av == PL_curstack ? cx->blk_oldsp : AvFILL(av)))
1933 if (av != PL_curstack && sv == &PL_sv_undef) {
H A Dsv.c11266 /* PL_curstack = PL_curstackinfo->si_stack; */
11267 PL_curstack = av_dup(proto_perl->Tcurstack, param);
11271 PL_stack_base = AvARRAY(PL_curstack);
11274 PL_stack_max = PL_stack_base + AvMAX(PL_curstack);
H A Dutil.c1047 thr, PL_curstack, PL_mainstack));

Completed in 120 milliseconds