IV topbucket
, topbucket_ev
, topbucket_odd
, totfree
, total
, total_chain
;
IV total_sbrk
, sbrks
, sbrk_good
, sbrk_slack
, start_slack
, sbrked_remains
;
UV
*bucket_available_size
;
typedef struct perl_mstats perl_mstats_t
;
Malloc_t
Perl_malloc (MEM_SIZE nbytes
);
Malloc_t
Perl_calloc (MEM_SIZE elements
, MEM_SIZE size
);
Malloc_t
Perl_realloc (Malloc_t where
, MEM_SIZE nbytes
);
/* 'mfree' rather than 'free', since there is already a 'perl_free'
* that causes clashes with case-insensitive linkers */
Free_t
Perl_mfree (Malloc_t where
);
#ifndef NO_MALLOC_DYNAMIC_CFG
/* IV configuration data */
MallocCfg_MIN_SBRK_FRAC1000
,
MallocCfg_SBRK_ALLOW_FAILURES
,
MallocCfg_SBRK_FAILURE_PRICE
,
MallocCfg_emergency_buffer_size
,
MallocCfg_emergency_buffer_last_req
,
MallocCfg_emergency_buffer_prepared_size
,
/* char* configuration data */
MallocCfgP_emergency_buffer
,
MallocCfgP_emergency_buffer_prepared
,
extern IV
*MallocCfg_ptr
;
extern char **MallocCfgP_ptr
;