require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_MSDOSFS_BPB_H_)) {
    eval 'sub _MSDOSFS_BPB_H_ () {1;}' unless defined(&_MSDOSFS_BPB_H_);
    eval 'sub FATNUM () {0xf;}' unless defined(&FATNUM);
    eval 'sub FATMIRROR () {0x80;}' unless defined(&FATMIRROR);
    eval 'sub FSVERS () {0;}' unless defined(&FSVERS);
    if(defined(&atari)) {
	if(0) {
	}
    }
    require 'sys/endian.ph';
    eval 'sub getushort {
        my($p) = @_;
	    eval q( &le16dec($p));
    }' unless defined(&getushort);
    eval 'sub getulong {
        my($p) = @_;
	    eval q( &le32dec($p));
    }' unless defined(&getulong);
    eval 'sub putushort {
        my($p, $v) = @_;
	    eval q( &le16enc(($p), ($v)));
    }' unless defined(&putushort);
    eval 'sub putulong {
        my($p, $v) = @_;
	    eval q( &le32enc(($p), ($v)));
    }' unless defined(&putulong);
}
1;
