Lines Matching defs:fill
730 Perl's C<$#array = $fill;>.735 Perl_av_fill(pTHX_ register AV *av, I32 fill)740 if (fill < 0)741 fill = -1;750 PUSHs(sv_2mortal(newSViv(fill+1)));758 if (fill <= AvMAX(av)) {763 while (key > fill) {769 while (key < fill)773 AvFILLp(av) = fill;778 (void)av_store(av,fill,&PL_sv_undef);