Lines Matching defs:srcpad

2504 Perl_padlist_dup(pTHX_ PADLIST *srcpad, CLONE_PARAMS *param)
2513     assert (SvREFCNT(PadlistARRAY(srcpad)[1]) == 1);
2515     max = cloneall ? PadlistMAX(srcpad) : 1;
2518     ptr_table_store(PL_ptr_table, srcpad, dstpad);
2522     PadlistARRAY(dstpad)[0] = (PAD *)padnamelist_dup_inc(PadlistNAMES(srcpad), param);
2527                 av_dup_inc(PadlistARRAY(srcpad)[depth], param);
2531         PADOFFSET ix = AvFILLp(PadlistARRAY(srcpad)[1]);
2533         const PADOFFSET names_fill = PadnamelistMAX(PadlistNAMES(srcpad));
2534         const PAD *const srcpad1 = PadlistARRAY(srcpad)[1];
2737 Perl_padnamelist_dup(pTHX_ PADNAMELIST *srcpad, CLONE_PARAMS *param)
2740     SSize_t max = PadnamelistMAX(srcpad);
2745     dstpad = (PADNAMELIST *)ptr_table_fetch(PL_ptr_table, srcpad);
2751     PadnamelistMAXNAMED(dstpad) = PadnamelistMAXNAMED(srcpad);
2754     ptr_table_store(PL_ptr_table, srcpad, dstpad);
2756       if (PadnamelistARRAY(srcpad)[max]) {
2758             padname_dup_inc(PadnamelistARRAY(srcpad)[max], param);