require '_h2ph_pre.ph';

no warnings qw(redefine misc);

require 'dev/ofw/openfirm.ph';
unless(defined(&HDL2CELL)) {
    sub HDL2CELL {
	my($x) = @_;
	eval q(( &cell_t)($x));
    }
}
unless(defined(&ADR2CELL)) {
    sub ADR2CELL {
	my($x) = @_;
	eval q(( &cell_t)($x));
    }
}
unless(defined(&HDQ2CELL_HI)) {
    sub HDQ2CELL_HI {
	my($x) = @_;
	eval q(( &cell_t)(0));
    }
}
unless(defined(&HDQ2CELL_LO)) {
    sub HDQ2CELL_LO {
	my($x) = @_;
	eval q(( &cell_t)($x));
    }
}
unless(defined(&CELL2HDQ)) {
    sub CELL2HDQ {
	my($hi, $lo) = @_;
	eval q(($lo));
    }
}
1;
