Author: stevehay Date: Fri Jul 12 08:08:00 2013 New Revision: 1502464 URL: http://svn.apache.org/r1502464 Log: Move all declarations before code: VC++ doesn't support code before declarations unless compiling as C++.
Modified: perl/modperl/branches/httpd24/xs/Apache2/RequestUtil/Apache2__RequestUtil.h Modified: perl/modperl/branches/httpd24/xs/Apache2/RequestUtil/Apache2__RequestUtil.h URL: http://svn.apache.org/viewvc/perl/modperl/branches/httpd24/xs/Apache2/RequestUtil/Apache2__RequestUtil.h?rev=1502464&r1=1502463&r2=1502464&view=diff ============================================================================== --- perl/modperl/branches/httpd24/xs/Apache2/RequestUtil/Apache2__RequestUtil.h (original) +++ perl/modperl/branches/httpd24/xs/Apache2/RequestUtil/Apache2__RequestUtil.h Fri Jul 12 08:08:00 2013 @@ -355,12 +355,18 @@ void mpxs_Apache2__RequestRec_child_term static MP_INLINE apr_status_t mpxs_ap_register_auth_provider(pTHX_ I32 items, SV **MARK, SV **SP) { + apr_pool_t *pool; + const char *provider_group; + const char *provider_name; + const char *provider_version; + SV *callback1; + SV *callback2 = NULL; + int type; + if (items != 7) Perl_croak(aTHX_ "pool, provider_group, provider_name, " "provider_version, callback1, callback2, type"); - apr_pool_t *pool; - if (SvROK(*MARK) && sv_derived_from(*MARK, "APR::Pool")) { IV tmp = SvIV((SV*)SvRV(*MARK)); if (tmp == 0) { @@ -375,20 +381,20 @@ apr_status_t mpxs_ap_register_auth_provi } MARK++; - const char *provider_group = (const char *)SvPV_nolen(*MARK); + provider_group = (const char *)SvPV_nolen(*MARK); MARK++; - const char *provider_name = (const char *)SvPV_nolen(*MARK); + provider_name = (const char *)SvPV_nolen(*MARK); MARK++; - const char *provider_version = (const char *)SvPV_nolen(*MARK); + provider_version = (const char *)SvPV_nolen(*MARK); MARK++; - SV *callback1 = newSVsv(*MARK); + callback1 = newSVsv(*MARK); MARK++; - SV *callback2 = NULL; + callback2 = NULL; if (SvROK(*MARK)) { callback2 = newSVsv(*MARK); } MARK++; - int type = (int)SvIV(*MARK); + type = (int)SvIV(*MARK); return modperl_register_auth_provider(pool, provider_group, provider_name, provider_version, callback1,