You are viewing a plain text version of this content. The canonical link for it is here.
Posted to dev@perl.apache.org by Stas Bekman <st...@stason.org> on 2003/01/12 04:10:37 UTC
Re: cvs commit: modperl-2.0/xs/tables/current/ModPerl FunctionTable.pm
Can the xs wizards please verify that I did the reference counting
right? I'm afraid I might have a leak here.
> +static MP_INLINE SV *mpxs_Apache__Filter_ctx(pTHX_
> + ap_filter_t *filter,
> + SV *data)
> +{
> + modperl_filter_ctx_t *ctx = (modperl_filter_ctx_t *)(filter->ctx);
> +
> + if (data != Nullsv) {
> + ctx->data = SvREFCNT_inc(data);
> + }
> +
> + return ctx->data ? SvREFCNT_inc(ctx->data) : &PL_sv_undef;
> +}
>
--
__________________________________________________________________
Stas Bekman JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide ---> http://perl.apache.org
mailto:stas@stason.org http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org http://ticketmaster.com
---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org