Current File : //usr/local/apps/perl/lib/site_perl/5.30.0/x86_64-linux/malloc.ph

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_MALLOC_H)) {
    eval 'sub _MALLOC_H () {1;}' unless defined(&_MALLOC_H);
    require 'features.ph';
    require 'stddef.ph';
    require 'stdio.ph';
    eval 'sub __malloc_ptr_t () { &void *;}' unless defined(&__malloc_ptr_t);
    eval 'sub __malloc_size_t () {\'size_t\';}' unless defined(&__malloc_size_t);
    eval 'sub __malloc_ptrdiff_t () { &ptrdiff_t;}' unless defined(&__malloc_ptrdiff_t);
    if(defined(&__GNUC__)) {
	eval 'sub __MALLOC_P {
	    my($args) = @_;
    	    eval q($args  &__THROW);
	}' unless defined(&__MALLOC_P);
	eval 'sub __MALLOC_PMT {
	    my($args) = @_;
    	    eval q($args);
	}' unless defined(&__MALLOC_PMT);
    } else {
	eval 'sub __MALLOC_P {
	    my($args) = @_;
    	    eval q($args);
	}' unless defined(&__MALLOC_P);
	eval 'sub __MALLOC_PMT {
	    my($args) = @_;
    	    eval q($args);
	}' unless defined(&__MALLOC_PMT);
    }
    unless(defined(&M_MXFAST)) {
	eval 'sub M_MXFAST () {1;}' unless defined(&M_MXFAST);
    }
    unless(defined(&M_NLBLKS)) {
	eval 'sub M_NLBLKS () {2;}' unless defined(&M_NLBLKS);
    }
    unless(defined(&M_GRAIN)) {
	eval 'sub M_GRAIN () {3;}' unless defined(&M_GRAIN);
    }
    unless(defined(&M_KEEP)) {
	eval 'sub M_KEEP () {4;}' unless defined(&M_KEEP);
    }
    eval 'sub M_TRIM_THRESHOLD () {-1;}' unless defined(&M_TRIM_THRESHOLD);
    eval 'sub M_TOP_PAD () {-2;}' unless defined(&M_TOP_PAD);
    eval 'sub M_MMAP_THRESHOLD () {-3;}' unless defined(&M_MMAP_THRESHOLD);
    eval 'sub M_MMAP_MAX () {-4;}' unless defined(&M_MMAP_MAX);
    eval 'sub M_CHECK_ACTION () {-5;}' unless defined(&M_CHECK_ACTION);
    eval 'sub M_PERTURB () {-6;}' unless defined(&M_PERTURB);
    eval 'sub M_ARENA_TEST () {-7;}' unless defined(&M_ARENA_TEST);
    eval 'sub M_ARENA_MAX () {-8;}' unless defined(&M_ARENA_MAX);
}
1;