Author: stas Date: Tue Dec 14 14:41:54 2004 New Revision: 111891 URL: http://svn.apache.org/viewcvs?view=rev&rev=111891 Log: fix compilation issues in ModPerl::Util::current_perl_id (on some builds newSVpvf can't be resolved but Perl_newSVpvf works just fine)
Modified: perl/modperl/trunk/Changes perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h Modified: perl/modperl/trunk/Changes Url: http://svn.apache.org/viewcvs/perl/modperl/trunk/Changes?view=diff&rev=111891&p1=perl/modperl/trunk/Changes&r1=111890&p2=perl/modperl/trunk/Changes&r2=111891 ============================================================================== --- perl/modperl/trunk/Changes (original) +++ perl/modperl/trunk/Changes Tue Dec 14 14:41:54 2004 @@ -12,6 +12,10 @@ =item 1.99_19-dev +fix compilation issues in ModPerl::Util::current_perl_id (on some +builds newSVpvf can't be resolved but Perl_newSVpvf works just +fine). [Stas, Markus Wichitill <[EMAIL PROTECTED]>] + fix APR::Error::str to return a lexical variable, rather than a string. This function is called by SvTRUE in modperl_errsv() via overload and on win32 (and randomly on linux) causes crashes via: Modified: perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h Url: http://svn.apache.org/viewcvs/perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h?view=diff&rev=111891&p1=perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h&r1=111890&p2=perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h&r2=111891 ============================================================================== --- perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h (original) +++ perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h Tue Dec 14 14:41:54 2004 @@ -15,10 +15,10 @@ #ifdef USE_ITHREADS #define mpxs_ModPerl__Util_current_perl_id() \ - newSVpvf("0x%lx", (unsigned long)aTHX) + Perl_newSVpvf(aTHX_ "0x%lx", (unsigned long)aTHX) #else #define mpxs_ModPerl__Util_current_perl_id() \ - newSVpvf("0x%lx", 0) + Perl_newSVpvf(aTHX_ "0x%lx", 0) #endif static MP_INLINE void mpxs_ModPerl__Util_untaint(pTHX_ I32 items,