Lines Matching refs:dst
72 SV *dst = sv_2mortal(newSV(slen+1));
73 U8 *d = (U8 *)SvPVX(dst);
74 STRLEN dlen = SvLEN(dst)-1;
90 SvCUR_set(dst, 0);
91 SvPOK_only(dst);
98 SvCUR_set(dst, dlen+ddone);
99 SvPOK_only(dst);
115 "more=%d, sdone=%d, sleft=%d, SvLEN(dst)=%d\n",
116 more, sdone, sleft, SvLEN(dst));
120 more = (1.0*tlen*SvLEN(dst)+sdone-1)/sdone
121 - SvLEN(dst);
123 more = (STRLEN)((1.0*SvLEN(dst)+1)/sdone * sleft);
125 /* safe until SvLEN(dst) == MAX_INT/16 */
126 more = (16*SvLEN(dst)+1)/sdone/16 * sleft;
130 d = (U8 *) SvGROW(dst, SvLEN(dst) + more);
131 /* dst need to grow need MORE bytes! */
132 if (ddone >= SvLEN(dst)) {
135 dlen = SvLEN(dst)-ddone-1;
165 sv_catsv(dst, perlqq);
171 sv_catsv(dst, htmlcref);
177 sv_catsv(dst, xmlcref);
182 sv_catpvn(dst, (char*)enc->rep, enc->replen);
207 sv_catsv(dst, perlqq);
211 sv_catpv(dst, FBCHAR_UTF8);
215 d = (U8 *)SvEND(dst);
216 dlen = SvLEN(dst) - ddone - 1;
238 SvCUR_set(dst, dlen+ddone);
239 SvPOK_only(dst);
242 if (SvCUR(dst) > SvCUR(src)){
244 "SvLEN(dst)=%d, SvCUR(dst)=%d. %d bytes unused(%f %%)\n",
245 SvLEN(dst), SvCUR(dst), SvLEN(dst) - SvCUR(dst),
246 (SvLEN(dst) - SvCUR(dst))*1.0/SvLEN(dst)*100.0);
254 *SvEND(dst) = '\0';
256 return dst;
281 SV *dst = newSV(slen>0?slen:1); /* newSV() abhors 0 -- inaba */
282 SvPOK_only(dst);
283 SvCUR_set(dst,0);
304 sv_catpvn(dst,(char *)s,skip);
329 sv_catsv(dst, perlqq);
332 sv_catpv(dst, FBCHAR_UTF8);
336 *SvEND(dst) = '\0';
346 SvUTF8_on(dst);
347 ST(0) = sv_2mortal(dst);
361 SV *dst = newSV(slen>0?slen:1); /* newSV() abhors 0 -- inaba */
364 sv_setpvn(dst,(char *)s,(e-s));
369 U8 *d = (U8 *) SvGROW(dst, 2*slen+1); /* +1 or assertion will botch */
379 SvCUR_set(dst, d- (U8 *)SvPVX(dst));
380 *SvEND(dst) = '\0';
391 SvPOK_only(dst);
392 SvUTF8_off(dst);
393 ST(0) = sv_2mortal(dst);
420 Method_cat_decode(obj, dst, src, off, term, check = 0)
422 SV * dst
435 sv_catsv(dst, encode_method(aTHX_ enc, enc->t_utf8, src, check,