perl-dev mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Stas Bekman <s...@stason.org>
Subject Re: [PATCH] Re: What Perl configuration is required for mp2 on Win32?
Date Fri, 04 Feb 2005 15:35:30 GMT

> 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:stas@stason.org http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org   http://ticketmaster.com

---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org


Mime
View raw message