You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by ra...@apache.org on 2004/12/27 19:47:18 UTC
svn commit: r123437 - /perl/modperl/trunk/xs/APR/URI/APR__URI.h
Author: randyk
Date: Mon Dec 27 10:47:17 2004
New Revision: 123437
URL: http://svn.apache.org/viewcvs?view=rev&rev=123437
Log:
declare variable earlier for some compilers
Modified:
perl/modperl/trunk/xs/APR/URI/APR__URI.h
Modified: perl/modperl/trunk/xs/APR/URI/APR__URI.h
Url: http://svn.apache.org/viewcvs/perl/modperl/trunk/xs/APR/URI/APR__URI.h?view=diff&rev=123437&p1=perl/modperl/trunk/xs/APR/URI/APR__URI.h&r1=123436&p2=perl/modperl/trunk/xs/APR/URI/APR__URI.h&r2=123437
==============================================================================
--- perl/modperl/trunk/xs/APR/URI/APR__URI.h (original)
+++ perl/modperl/trunk/xs/APR/URI/APR__URI.h Mon Dec 27 10:47:17 2004
@@ -38,12 +38,13 @@
static MP_INLINE
SV *mpxs_apr_uri_parse(pTHX_ SV *classname, SV *p_sv, const char *uri_string)
{
+ SV *uri_sv;
apr_pool_t *p = mp_xs_sv2_APR__Pool(p_sv);
modperl_uri_t *uri = modperl_uri_new(p);
(void)apr_uri_parse(p, uri_string, &uri->uri);
- SV *uri_sv = sv_setref_pv(NEWSV(0, 0), "APR::URI", (void*)uri);
+ uri_sv = sv_setref_pv(NEWSV(0, 0), "APR::URI", (void*)uri);
mpxs_add_pool_magic(uri_sv, p_sv);
return uri_sv;