OK, new patch attached. This compiles cleanly and fixes the perl-malloc issues for me. Hope it's OK for you too.

Almost there. env needs to be **env. Here is the patch that I've committed:

Index: src/modules/perl/mod_perl.c
===================================================================
--- src/modules/perl/mod_perl.c (revision 151089)
+++ src/modules/perl/mod_perl.c (working copy)
@@ -542,11 +542,17 @@
  */
 static apr_status_t modperl_sys_init(void)
 {
+    int argc = 0;
+    char **argv = NULL, **env = NULL;
+
     MP_TRACE_i(MP_FUNC, "mod_perl sys init\n");

+    /* not every OS uses those vars in PERL_SYS_INIT3 macro */
+    argc = argc; argv = argv; env = env;
+
+    PERL_SYS_INIT3(&argc, &argv, &env);
+
 #if 0 /*XXX*/
-    PERL_SYS_INIT(0, NULL);
-
 #ifdef PTHREAD_ATFORK
     if (!ap_exists_config_define("PERL_PTHREAD_ATFORK_DONE")) {
         PTHREAD_ATFORK(Perl_atfork_lock,
@@ -581,9 +587,8 @@

     modperl_perl_pp_unset_all();

-#if 0 /*XXX*/
     PERL_SYS_TERM();
-#endif
+
     return APR_SUCCESS;
 }




-- __________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]



Reply via email to