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/byteswap.ph
require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_BYTESWAP_H_)) {
    eval 'sub _BYTESWAP_H_ () {1;}' unless defined(&_BYTESWAP_H_);
    require 'sys/_endian.ph';
    eval 'sub __bswap_16 {
        my($x) = @_;
	    eval q( &__bswap16($x));
    }' unless defined(&__bswap_16);
    eval 'sub __bswap_32 {
        my($x) = @_;
	    eval q( &__bswap32($x));
    }' unless defined(&__bswap_32);
    eval 'sub __bswap_64 {
        my($x) = @_;
	    eval q( &__bswap64($x));
    }' unless defined(&__bswap_64);
    eval 'sub bswap_16 {
        my($x) = @_;
	    eval q( &__bswap16($x));
    }' unless defined(&bswap_16);
    eval 'sub bswap_32 {
        my($x) = @_;
	    eval q( &__bswap32($x));
    }' unless defined(&bswap_32);
    eval 'sub bswap_64 {
        my($x) = @_;
	    eval q( &__bswap64($x));
    }' unless defined(&bswap_64);
}
1;

Anon7 - 2021