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;

Reply via email to