diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-06-20 08:42:58 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-06-20 08:42:58 +0000 |
| commit | 41ad8e4261642146314ec7332abffcab995f9fc9 (patch) | |
| tree | 2626e9a957e89581237ac973d1ff8c3b632635f0 /malloc.c | |
| parent | 6bf964e1a60fa5bb711b214d387c6f288b402685 (diff) | |
| download | perl-41ad8e4261642146314ec7332abffcab995f9fc9.tar.gz | |
Allow for things like -DFILL_CHECK_DEFAULT=0 (from Ilya).
p4raw-id: //depot/perl@19834
Diffstat (limited to 'malloc.c')
| -rw-r--r-- | malloc.c | 16 |
1 files changed, 13 insertions, 3 deletions
@@ -1035,6 +1035,16 @@ extern Malloc_t sbrk(int); #ifndef NO_MALLOC_DYNAMIC_CFG # define PERL_MALLOC_OPT_CHARS "FMfAPGdac" +# ifndef FILL_DEAD_DEFAULT +# define FILL_DEAD_DEFAULT 1 +# endif +# ifndef FILL_ALIVE_DEFAULT +# define FILL_ALIVE_DEFAULT 1 +# endif +# ifndef FILL_CHECK_DEFAULT +# define FILL_CHECK_DEFAULT 1 +# endif + static IV MallocCfg[MallocCfg_last] = { FIRST_SBRK, MIN_SBRK, @@ -1042,9 +1052,9 @@ static IV MallocCfg[MallocCfg_last] = { SBRK_ALLOW_FAILURES, SBRK_FAILURE_PRICE, SBRK_ALLOW_FAILURES * SBRK_FAILURE_PRICE, /* sbrk_goodness */ - 1, /* FILL_DEAD */ - 1, /* FILL_ALIVE */ - 1, /* FILL_CHECK */ + FILL_DEAD_DEFAULT, /* FILL_DEAD */ + FILL_ALIVE_DEFAULT, /* FILL_ALIVE */ + FILL_CHECK_DEFAULT, /* FILL_CHECK */ 0, /* MallocCfg_skip_cfg_env */ 0, /* MallocCfg_cfg_env_read */ 0, /* MallocCfg_emergency_buffer_size */ |