Lines Matching defs:buf_sv
4834 Perl_filter_read(pTHX_ int idx, SV *buf_sv, int maxlen)
4856 const int old_len = SvCUR(buf_sv);
4858 /* ensure buf_sv is large enough */
4859 SvGROW(buf_sv, (STRLEN)(old_len + correct_length + 1)) ;
4860 if ((len = PerlIO_read(PL_rsfp, SvPVX(buf_sv) + old_len,
4867 SvCUR_set(buf_sv, old_len + len) ;
4868 SvPVX(buf_sv)[old_len + len] = '\0';
4871 if (sv_gets(buf_sv, PL_rsfp, SvCUR(buf_sv)) == NULL) {
4878 return SvCUR(buf_sv);
4885 return FILTER_READ(idx+1, buf_sv, correct_length); /* recurse */
4893 sv_catpvn(buf_sv, SvEND(datasv), correct_length);
4907 sv_catpvn(buf_sv, SvEND(datasv), s-SvEND(datasv));
4910 return SvCUR(buf_sv);
4918 /* call "FILTER_READ(idx+1, buf_sv)" first. */
4922 ret = (*funcp)(aTHX_ idx, buf_sv, correct_length);