Lines Matching defs:ary

2919             AV *ary = MUTABLE_AV(lsv);
2988             /* Reserve slots for ary, plus the elems we're about to copy,
2989              * then protect ary and temporarily void the remaining slots
2992             PL_tmps_stack[++PL_tmps_ix] = SvREFCNT_inc_simple_NN(ary);
3066             if (SvRMAGICAL(ary) || AvFILLp(ary) >= 0) /* may be non-empty */
3067                 av_clear(ary);
3075             if (alias || SvMAGICAL(ary) || SvREADONLY(ary) || !AvREAL(ary)) {
3077                 av_extend(ary, nelems - 1);
3097                     if (av_store(ary, i, rsv))
3107                 /* disarm ary refcount: see comments below about leak */
3114                 if (fill > AvMAX(ary))
3115                     av_extend_guts(ary, fill, &AvMAX(ary), &AvALLOC(ary),
3116                                     &AvARRAY(ary));
3117                 AvFILLp(ary) = fill;
3119                 Copy(relem, AvARRAY(ary), nelems, SV*);
3132                 Copy(&(PL_tmps_stack[tmps_base]), AvARRAY(ary), nelems, SV*);
3134                  * since ary has now taken ownership of the refcnt.
3135                  * Also remove ary: which will now leak if we die before
3136                  * the SvREFCNT_dec_NN(ary) below */
3147                 /* its assumed @ISA set magic can't die and leak ary */
3148                 SvSETMAGIC(MUTABLE_SV(ary));
3151             assert(*lelem == (SV*)ary);
3155             SvREFCNT_dec_NN(ary);
5038         case CXt_LOOP_ARY: /* for (@ary) */
5040             av = cx->blk_loop.state_u.ary.ary;
5042             ix = (cx->blk_loop.state_u.ary.ix += inc);
6390                 SV **ary = AvALLOC(av);
6391                 Renew(ary, items, SV*);
6393                 AvALLOC(av) = ary;
6394                 AvARRAY(av) = ary;