From 22f7c9c9717fe07b508ba0e9958ef0592cdbbeef Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Fri, 20 Jun 2003 07:31:11 +0000 Subject: More Perl malloc debugging magic from Ilya. Seems to work in Linux, Solaris, AIX. Had to do #ifdef OS2 for the in malloc.c, found in AIX since there is no such header. In Tru64 miniperl fails an assert: "free()ed/realloc()ed-away memory was overwritten?" (In IRIX compiles but that doesn't prove much since in IRIX Perl's malloc is simply not used.) p4raw-id: //depot/perl@19831 --- unixish.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'unixish.h') diff --git a/unixish.h b/unixish.h index 5c95a7b0d4..4bf37095a0 100644 --- a/unixish.h +++ b/unixish.h @@ -129,7 +129,7 @@ #define Mkdir(path,mode) mkdir((path),(mode)) #ifndef PERL_SYS_INIT -# define PERL_SYS_INIT(c,v) PERL_FPU_INIT MALLOC_INIT +# define PERL_SYS_INIT(c,v) MALLOC_CHECK_TAINT2(*c,*v) PERL_FPU_INIT MALLOC_INIT #endif #ifndef PERL_SYS_TERM -- cgit v1.2.1