require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&DECLARE_INTR_MASK)) {
    sub DECLARE_INTR_MASK {
	my($s) = @_;
	eval q( &intrmask_t $s);
    }
}
unless(defined(&DISABLE_INTR)) {
    sub DISABLE_INTR {
	my($s) = @_;
	eval q($s= &spltty());
    }
}
unless(defined(&ENABLE_INTR)) {
    sub ENABLE_INTR {
	my($s) = @_;
	eval q( &splx($s));
    }
}
1;
