/openbsd/gnu/usr.bin/perl/ |
H A D | av.c | 38 AvARRAY(av)[--key] = NULL; in Perl_av_reify() 309 if (!AvARRAY(av)[key]) { in Perl_av_fetch() 314 return &AvARRAY(av)[key]; in Perl_av_fetch() 379 ary = AvARRAY(av); in Perl_av_store() 480 AvARRAY(av) = ary; in Perl_av_make() 735 AvARRAY(av) = NULL; in Perl_av_undef() 900 AvARRAY(av) = AvARRAY(av) - i; in Perl_av_unshift() 913 ary = AvARRAY(av); in Perl_av_unshift() 921 AvARRAY(av) = AvARRAY(av) + slide; in Perl_av_unshift() 956 retval = *AvARRAY(av); in Perl_av_shift() [all …]
|
H A D | pad.h | 160 if (PL_comppad ? (AvARRAY(PL_comppad) != PL_curpad) : (PL_curpad != 0)) \ 166 if (!PL_comppad || (AvARRAY(PL_comppad) != PL_curpad)) \ 333 #define PadARRAY(pad) AvARRAY(pad) 405 ? AvARRAY(MUTABLE_AV((PadlistARRAY(padlist)[1])))[po] \ 411 PL_curpad = AvARRAY(PL_comppad); \ 429 PL_curpad = PL_comppad ? AvARRAY(PL_comppad) : NULL; \ 437 PL_curpad = PL_comppad ? AvARRAY(PL_comppad) : NULL; \ 455 #define CX_CURPAD_SV(block,po) (AvARRAY(MUTABLE_AV(((block).oldcomppad)))[po]) 520 PL_curpad = PL_comppad ? AvARRAY(PL_comppad) : NULL; \
|
H A D | mro_core.c | 287 SV **svp = AvARRAY(av); in S_mro_get_linear_isa_dfs() 313 subrv_p = AvARRAY(subrv); in S_mro_get_linear_isa_dfs() 351 svp = AvARRAY(retval); in S_mro_get_linear_isa_dfs() 440 SV **ovp = AvARRAY(old); in Perl_mro_get_linear_isa() 444 *AvARRAY(isa) = namesv; in Perl_mro_get_linear_isa() 445 svp = AvARRAY(isa)+1; in Perl_mro_get_linear_isa() 455 SV *const *svp = AvARRAY(isa); in Perl_mro_get_linear_isa() 671 svp = AvARRAY(linear_mro) + 1; in Perl_mro_isa_changed_in() 964 svp = AvARRAY((AV *)namesv); in S_mro_gather_and_rename() 1007 svp = AvARRAY((AV *)namesv); in S_mro_gather_and_rename() [all …]
|
H A D | pad.c | 225 AvARRAY(pad) = AvALLOC(pad); in Perl_pad_new() 231 AvARRAY(pad)[0] = MUTABLE_SV(a0); in Perl_pad_new() 260 PL_curpad = AvARRAY(pad); in Perl_pad_new() 780 PL_curpad = AvARRAY(PL_comppad); in Perl_pad_alloc() 1313 PL_curpad = AvARRAY(PL_comppad); in S_pad_findlex() 1751 PL_curpad = AvARRAY(PL_comppad); in Perl_pad_tidy() 1817 ppad = AvARRAY(pad); in Perl_do_dump_pad() 1984 PL_curpad = AvARRAY(PL_comppad); in S_cv_clone_pad() 2481 AvARRAY(newpad)[ix] = sv; in Perl_pad_push() 2535 SV **oldpad = AvARRAY(srcpad1); in Perl_padlist_dup() [all …]
|
H A D | deb.c | 121 PTR2UV(PL_mainstack), PTR2UV(AvARRAY(PL_curstack)), in Perl_debstackptrs() 321 stack_max = PL_stack_sp - AvARRAY(si->si_stack); in Perl_deb_stack_all() 360 S_deb_stack_n(aTHX_ AvARRAY(si->si_stack), in Perl_deb_stack_all()
|
H A D | pp_sort.c | 842 SV **svp = AvARRAY(av); in PP() 1140 Copy(base, AvARRAY(av), max, SV*); in PP() 1233 if (AvARRAY(av) != ary) { in S_sortcv_stacked() 1234 AvMAX(av) += AvARRAY(av) - AvALLOC(av); in S_sortcv_stacked() 1235 AvARRAY(av) = ary; in S_sortcv_stacked() 1240 AvARRAY(av) = ary; in S_sortcv_stacked() 1246 AvARRAY(av)[0] = a; in S_sortcv_stacked() 1247 AvARRAY(av)[1] = b; in S_sortcv_stacked()
|
H A D | inline.h | 97 ary = AvARRAY(av); in Perl_av_store_simple() 102 ary = AvARRAY(av); in Perl_av_store_simple() 140 if ( (key > AvFILLp(av)) || !AvARRAY(av)[key]) { in Perl_av_fetch_simple() 143 return &AvARRAY(av)[key]; in Perl_av_fetch_simple() 209 AvARRAY(av) = ary; in Perl_av_new_alloc() 226 SSize_t i = AvARRAY(av) - AvALLOC(av); in Perl_av_remove_offset() 228 AvARRAY(av) = AvALLOC(av); in Perl_av_remove_offset() 3688 assert(AvARRAY(MUTABLE_AV( in Perl_cx_popsub_args() 3967 SV *sv = AvARRAY(av)[i]; in Perl_clear_defarray_simple() 3968 AvARRAY(av)[i--] = NULL; in Perl_clear_defarray_simple() [all …]
|
H A D | av.h | 78 #define AvARRAY(av) ((av)->sv_u.svu_array) macro
|
H A D | pp.c | 6200 *MARK = AvARRAY(ary)[offset+length-1]; 6215 src = &AvARRAY(ary)[offset-1]; 6220 dst = AvARRAY(ary); 6221 AvARRAY(ary) = AvARRAY(ary) - diff; /* diff is negative */ 6230 dst = &AvARRAY(ary)[AvFILLp(ary)+1]; 6253 src = AvARRAY(ary); 6257 AvARRAY(ary) = AvARRAY(ary) - diff;/* diff is positive */ 6429 SvREFCNT_dec(AvARRAY(ary)[i]); in PP() 6430 AvARRAY(ary)[i] = sv; in PP() 6508 SV **begin = AvARRAY(av); [all …]
|
H A D | class.c | 198 CV **cvp = (CV **)AvARRAY(aux->xhv_class_adjust_blocks); in XS() 567 av_push(aux->xhv_class_adjust_blocks, AvARRAY(superaux->xhv_class_adjust_blocks)[i]); in apply_class_attribute_isa() 902 (ap++)->uv = SvUV(AvARRAY(fieldmap)[i]); in Perl_class_wrap_method_body()
|
H A D | pp_hot.c | 363 targ = AvARRAY(av)[key]; in PP() 1465 SV *sv = AvARRAY(av)[i]; in S_pushav() 2050 sv = AvARRAY(av)[key]; in PP() 3116 &AvARRAY(ary)); in PP() 3119 Copy(relem, AvARRAY(ary), nelems, SV*); in PP() 3132 Copy(&(PL_tmps_stack[tmps_base]), AvARRAY(ary), nelems, SV*); in PP() 5057 sv = AvARRAY(av)[ix]; in PP() 6394 AvARRAY(av) = ary; in PP() 6398 Copy(MARK+1,AvARRAY(av),items,SV*); in PP() 6456 sv = AvARRAY(av)[i]; in PP()
|
H A D | universal.c | 739 for (svp = AvARRAY(sv) + AvFILLp(sv) in XS() 740 ; svp >= AvARRAY(sv) in XS()
|
H A D | sv.c | 6256 AvARRAY(av)[++AvFILLp(av)] = sv; /* av_push() */ 6326 svp = AvARRAY(av); 6337 AvARRAY(av)++; 6406 svp = AvARRAY(av); 7049 sv = AvARRAY(av)[AvFILLp(av)--]; 16001 PL_regex_pad = AvARRAY(PL_regex_padav); 16298 PL_stack_base = AvARRAY(PL_curstack); 16389 SV **svp = AvARRAY(unreferenced); 16399 svp = AvARRAY(unreferenced); 16732 if (!av || SvMAGICAL(av) || !AvARRAY(av) || [all …]
|
H A D | dump.c | 2121 PTR2UV(AvARRAY(sv))); in Perl_do_sv_dump() 2122 if (AvARRAY(sv) != AvALLOC(sv)) { in Perl_do_sv_dump() 2124 (IV)(AvARRAY(sv) - AvALLOC(sv))); in Perl_do_sv_dump() 2139 if (nest < maxnest && AvARRAY(MUTABLE_AV(sv))) { in Perl_do_sv_dump() 2141 SV **svp = AvARRAY(MUTABLE_AV(sv)); in Perl_do_sv_dump()
|
H A D | scope.c | 1643 PL_curpad = AvARRAY(PL_comppad); in Perl_leave_scope() 1654 svp = AvARRAY((PAD*)a1.any_ptr) + (PADOFFSET)a2.any_uv; in Perl_leave_scope()
|
/openbsd/gnu/usr.bin/perl/cpan/Scalar-List-Utils/ |
H A D | multicall.h | 39 SV** const svp = AvARRAY(padlist); in multicall_pad_push() 41 SV** const oldpad = AvARRAY(svp[depth-1]); in multicall_pad_push() 44 SV** const names = AvARRAY(svp[0]); in multicall_pad_push() 144 PL_comppad = (AV*) (AvARRAY(padlist)[CvDEPTH(multicall_cv)]); \ 145 PL_curpad = AvARRAY(PL_comppad); \
|
H A D | ListUtil.xs | 619 SV **svs = AvARRAY(retvals); in reduce() 877 mPUSHs(newSVsv(AvARRAY(pairav)[0])); in unpairs() 882 mPUSHs(newSVsv(AvARRAY(pairav)[1])); in unpairs() 1640 AvARRAY(lists[listi])[i] : 1659 AvARRAY(lists[listi])[i] :
|
/openbsd/gnu/usr.bin/perl/ext/mro/ |
H A D | mro.xs | 84 SV** isa_ptr = AvARRAY(isa); in S_mro_get_linear_isa_c3() 108 SV *const *subrv_p = AvARRAY(isa_lin); in S_mro_get_linear_isa_c3() 117 svp = AvARRAY(retval); in S_mro_get_linear_isa_c3() 154 seqs_ptr = AvARRAY(seqs); in S_mro_get_linear_isa_c3() 160 SV** seq_ptr = AvARRAY(seq) + 1; in S_mro_get_linear_isa_c3() 185 SV** const avptr = AvARRAY(seqs); in S_mro_get_linear_isa_c3() 600 linear_svp = AvARRAY(linear_av);
|
/openbsd/gnu/usr.bin/perl/cpan/Digest-SHA/src/ |
H A D | sdf.c | 47 SV** svp = AvARRAY(av);
|
/openbsd/gnu/usr.bin/perl/ext/File-Glob/ |
H A D | Glob.xs | 126 Copy(AvARRAY(entries), SP+1, AvFILLp(entries)+1, SV *); in iterate() 256 SV **svp = AvARRAY(patav); in csh_glob()
|
/openbsd/gnu/usr.bin/perl/ext/Devel-Peek/ |
H A D | Changes | 47 Changes by Gisle: do not print both if AvARRAY == AvALLOC;
|
H A D | Peek.xs | 63 pad = AvARRAY((AV*)svp[i]); in DeadCode() 69 args = AvARRAY(argav); in DeadCode()
|
/openbsd/gnu/usr.bin/perl/dist/Storable/ |
H A D | Storable.xs | 1326 qsort((char *) AvARRAY(av), len, sizeof(SV *), sortcmp);\ 1332 qsort((char *) AvARRAY(av), len, sizeof(SV *), sortcmp); 1339 sortsv(AvARRAY(av), len, Perl_sv_cmp); 2134 SV **ary = AvARRAY(av); in scalar_call() 2214 SV** arr = AvARRAY(av); in cleanup_recursive_av() 3708 ary = AvARRAY(av); in store_hook() 5060 SV **ary = AvARRAY(av); in retrieve_hook_common() 5125 AvARRAY(av)[0] = SvREFCNT_inc(frozen); in retrieve_hook_common() 5199 AvARRAY(av)[0] = SvREFCNT_inc(frozen); in retrieve_hook_common()
|
/openbsd/gnu/usr.bin/perl/dist/threads-shared/ |
H A D | shared.xs | 1141 SV **svp = isav ? AvARRAY((AV *)ssv) : NULL; in sharedsv_array_mg_CLEAR() 1424 SV **svp = AvARRAY((AV *)ssv);
|
/openbsd/gnu/usr.bin/perl/ext/B/ |
H A D | B.xs | 2003 AvARRAY(av) 2007 SV **svp = AvARRAY(av); 2019 XPUSHs(make_sv_object(aTHX_ (AvARRAY(av)[idx])));
|