1N/A#ifndef MALLOC_CTL_H
1N/A# define MALLOC_CTL_H
1N/A
1N/Astruct perl_mstats {
1N/A UV *nfree;
1N/A UV *ntotal;
1N/A IV topbucket, topbucket_ev, topbucket_odd, totfree, total, total_chain;
1N/A IV total_sbrk, sbrks, sbrk_good, sbrk_slack, start_slack, sbrked_remains;
1N/A IV minbucket;
1N/A /* Level 1 info */
1N/A UV *bucket_mem_size;
1N/A UV *bucket_available_size;
1N/A UV nbuckets;
1N/A};
1N/Atypedef struct perl_mstats perl_mstats_t;
1N/A
1N/ASTART_EXTERN_C
1N/AMalloc_t Perl_malloc (MEM_SIZE nbytes);
1N/AMalloc_t Perl_calloc (MEM_SIZE elements, MEM_SIZE size);
1N/AMalloc_t Perl_realloc (Malloc_t where, MEM_SIZE nbytes);
1N/A/* 'mfree' rather than 'free', since there is already a 'perl_free'
1N/A * that causes clashes with case-insensitive linkers */
1N/AFree_t Perl_mfree (Malloc_t where);
1N/AEND_EXTERN_C
1N/A
1N/A#ifndef NO_MALLOC_DYNAMIC_CFG
1N/A
1N/A/* IV configuration data */
1N/Aenum {
1N/A MallocCfg_FIRST_SBRK,
1N/A MallocCfg_MIN_SBRK,
1N/A MallocCfg_MIN_SBRK_FRAC1000,
1N/A MallocCfg_SBRK_ALLOW_FAILURES,
1N/A MallocCfg_SBRK_FAILURE_PRICE,
1N/A MallocCfg_sbrk_goodness,
1N/A
1N/A MallocCfg_filldead,
1N/A MallocCfg_fillalive,
1N/A MallocCfg_fillcheck,
1N/A
1N/A MallocCfg_skip_cfg_env,
1N/A MallocCfg_cfg_env_read,
1N/A
1N/A MallocCfg_emergency_buffer_size,
1N/A MallocCfg_emergency_buffer_last_req,
1N/A
1N/A MallocCfg_emergency_buffer_prepared_size,
1N/A
1N/A MallocCfg_last
1N/A};
1N/A/* char* configuration data */
1N/Aenum {
1N/A MallocCfgP_emergency_buffer,
1N/A MallocCfgP_emergency_buffer_prepared,
1N/A MallocCfgP_last
1N/A};
1N/ASTART_EXTERN_C
1N/Aextern IV *MallocCfg_ptr;
1N/Aextern char **MallocCfgP_ptr;
1N/AEND_EXTERN_C
1N/A
1N/A#endif
1N/A
1N/A#endif