dougm 02/05/12 11:46:43 Modified: src/modules/perl modperl_perl.c Log: enable perl_free with win32/5.7.2+ Revision Changes Path 1.13 +5 -2 modperl-2.0/src/modules/perl/modperl_perl.c Index: modperl_perl.c =================================================================== RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_perl.c,v retrieving revision 1.12 retrieving revision 1.13 diff -u -r1.12 -r1.13 --- modperl_perl.c 6 Apr 2002 17:42:10 -0000 1.12 +++ modperl_perl.c 12 May 2002 18:46:43 -0000 1.13 @@ -121,10 +121,13 @@ perl_destruct(perl); /* XXX: big bug in 5.6.1 fixed in 5.7.2+ - * XXX: see CLONEf_CLONE_HOST perl_clone() flag * XXX: try to find a workaround for 5.6.1 */ -#ifndef WIN32 +#if defined(WIN32) && !defined(CLONEf_CLONE_HOST) +# define MP_NO_PERL_FREE +#endif + +#ifndef MP_NO_PERL_FREE perl_free(perl); #endif