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

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dpp_hot.c2822 I32 markix = TOPMARK; local
2857 if (gimme == G_SCALAR && ++markix != PL_stack_sp - PL_stack_base ) {
2858 if (markix > PL_stack_sp - PL_stack_base)
2859 *(PL_stack_base + markix) = &PL_sv_undef;
2861 *(PL_stack_base + markix) = *PL_stack_sp;
2862 PL_stack_sp = PL_stack_base + markix;

Completed in 20 milliseconds