Lines Matching refs:datasv
1975 * The datasv parameter (which may be NULL) can be used to pass
1980 * The supplied datasv parameter is upgraded to a PVIO type
1982 * and IOf_FAKE_DIRP is enabled on datasv to mark this as such.
1988 Perl_filter_add(pTHX_ filter_t funcp, SV *datasv)
1995 if (!datasv)
1996 datasv = NEWSV(255,0);
1997 if (!SvUPGRADE(datasv, SVt_PVIO))
1999 IoANY(datasv) = (void *)funcp; /* stash funcp into spare field */
2000 IoFLAGS(datasv) |= IOf_FAKE_DIRP;
2002 (void*)funcp, SvPV_nolen(datasv)));
2004 av_store(PL_rsfp_filters, 0, datasv) ;
2005 return(datasv);
2013 SV *datasv;
2018 datasv = FILTER_DATA(AvFILLp(PL_rsfp_filters));
2019 if (IoANY(datasv) == (void *)funcp) {
2020 IoFLAGS(datasv) &= ~IOf_FAKE_DIRP;
2021 IoANY(datasv) = (void *)NULL;
2039 SV *datasv = NULL;
2074 if ( (datasv = FILTER_DATA(idx)) == &PL_sv_undef){
2080 /* Get function pointer hidden within datasv */
2081 funcp = (filter_t)IoANY(datasv);
2084 idx, (void*)funcp, SvPV_nolen(datasv)));