KGRKJGETMRETU895U-589TY5MIGM5JGB5SDFESFREWTGR54TY
Server : Apache/2.4.62
System : FreeBSD fbsdweb2.web.rcn.net 14.1-RELEASE FreeBSD 14.1-RELEASE releng/14.1-n267679-10e31f0946d8 GENERIC amd64
User : www ( 80)
PHP Version : 8.3.8
Disable Function : NONE
Directory :  /usr/local/lib/perl5/site_perl/mach/5.36/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Current File : //usr/local/lib/perl5/site_perl/mach/5.36/malloc_np.ph
require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_MALLOC_NP_H_)) {
    eval 'sub _MALLOC_NP_H_ () {1;}' unless defined(&_MALLOC_NP_H_);
    require 'sys/types.ph';
    if(defined(&__cplusplus)) {
	eval 'sub __MyBool () { &bool;}' unless defined(&__MyBool);
    } else {
	eval 'sub __MyBool () { &_Bool;}' unless defined(&__MyBool);
    }
    eval 'sub MALLCTL_ARENAS_ALL () {4096;}' unless defined(&MALLCTL_ARENAS_ALL);
    eval 'sub MALLCTL_ARENAS_DESTROYED () {4097;}' unless defined(&MALLCTL_ARENAS_DESTROYED);
    eval 'sub MALLOCX_LG_ALIGN {
        my($la) = @_;
	    eval q((($la)));
    }' unless defined(&MALLOCX_LG_ALIGN);
    eval 'sub MALLOCX_ALIGN {
        my($a) = @_;
	    eval q((( &ffsl(($a))-1)));
    }' unless defined(&MALLOCX_ALIGN);
    eval 'sub MALLOCX_ZERO () {(0x40);}' unless defined(&MALLOCX_ZERO);
    eval 'sub MALLOCX_TCACHE {
        my($tc) = @_;
	    eval q((((($tc)+2) << 8)));
    }' unless defined(&MALLOCX_TCACHE);
    eval 'sub MALLOCX_TCACHE_NONE () { &MALLOCX_TCACHE(-1);}' unless defined(&MALLOCX_TCACHE_NONE);
    eval 'sub MALLOCX_ARENA {
        my($a) = @_;
	    eval q((((($a))+1) << 20));
    }' unless defined(&MALLOCX_ARENA);
    undef(&__MyBool) if defined(&__MyBool);
}
1;

Anon7 - 2021