require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_SPARC64_RBUS_MACHDEP_H_)) {
    eval 'sub _SPARC64_RBUS_MACHDEP_H_ () {1;}' unless defined(&_SPARC64_RBUS_MACHDEP_H_);
    eval 'sub md_space_map {
        my($rbt, $addr, $size, $flags, $hp) = @_;
	    eval q( &bus_space_map(($rbt)-> &rb_bt, ($addr), ($size), ($flags), ($hp)));
    }' unless defined(&md_space_map);
    eval 'sub md_space_unmap {
        my($rbt, $h, $size, $addrp) = @_;
	    eval q( &do { *$addrp = ($rbt)-> ($rb_bt->{sparc_bus_addr})(($rbt)-> &rb_bt, ($rbt)-> &rb_bt, ($h));  &bus_space_unmap(($rbt)-> &rb_bt, ($h), ($size)); }  &while (0));
    }' unless defined(&md_space_unmap);
}
1;
