Stas Bekman wrote:
>>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.
>
Oops. Yes, of course. Thanks.
- Steve
>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;
> }
>
>
------------------------------------------------
Radan Computational Ltd.
The information contained in this message and any files transmitted with it are
confidential and intended for the addressee(s) only. If you have received this
message in error or there are any problems, please notify the sender
immediately. The unauthorized use, disclosure, copying or alteration of this
message is strictly forbidden. Note that any views or opinions presented in
this email are solely those of the author and do not necessarily represent
those of Radan Computational Ltd. The recipient(s) of this message should
check it and any attached files for viruses: Radan Computational will accept no
liability for any damage caused by any virus transmitted by this email.
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
