Author: gozer Date: Wed May 18 06:34:18 2005 New Revision: 170747 URL: http://svn.apache.org/viewcvs?rev=170747&view=rev Log: fix global anon_cnt double-initialization bug that was causing startup segfaults on OSX. This could be re-introducing an older anonsub handler problem though.
Modified: perl/modperl/trunk/Changes perl/modperl/trunk/src/modules/perl/mod_perl.c perl/modperl/trunk/src/modules/perl/modperl_handler.c Modified: perl/modperl/trunk/Changes URL: http://svn.apache.org/viewcvs/perl/modperl/trunk/Changes?rev=170747&r1=170746&r2=170747&view=diff ============================================================================== --- perl/modperl/trunk/Changes (original) +++ perl/modperl/trunk/Changes Wed May 18 06:34:18 2005 @@ -12,6 +12,9 @@ =item 2.000_00-dev +fix global anon_cnt double-initialization bug that was causing +startup segfaults on OSX. [Gozer] + fix the ap_install target in the top-level Makefile (used for static build) [Stas] Modified: perl/modperl/trunk/src/modules/perl/mod_perl.c URL: http://svn.apache.org/viewcvs/perl/modperl/trunk/src/modules/perl/mod_perl.c?rev=170747&r1=170746&r2=170747&view=diff ============================================================================== --- perl/modperl/trunk/src/modules/perl/mod_perl.c (original) +++ perl/modperl/trunk/src/modules/perl/mod_perl.c Wed May 18 06:34:18 2005 @@ -532,6 +532,9 @@ modperl_global_init_server_rec(pconf, s); modperl_tls_create_request_rec(pconf); + + /* init the counter to 0 */ + modperl_global_anon_cnt_init(pconf); } /* Modified: perl/modperl/trunk/src/modules/perl/modperl_handler.c URL: http://svn.apache.org/viewcvs/perl/modperl/trunk/src/modules/perl/modperl_handler.c?rev=170747&r1=170746&r2=170747&view=diff ============================================================================== --- perl/modperl/trunk/src/modules/perl/modperl_handler.c (original) +++ perl/modperl/trunk/src/modules/perl/modperl_handler.c Wed May 18 06:34:18 2005 @@ -89,9 +89,6 @@ modperl_modglobal_lookup(aTHX_ "ANONSUB"); MP_TRACE_h(MP_FUNC, "init $PL_modglobal{ANONSUB} = []"); MP_MODGLOBAL_STORE_HV(gkey); - - /* init the counter to 0 */ - modperl_global_anon_cnt_init(p); } /* allocate and populate the anon handler sub-struct */