require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&__DEV_TC_TCVAR_H__)) {
    eval 'sub __DEV_TC_TCVAR_H__ () {1;}' unless defined(&__DEV_TC_TCVAR_H__);
    require 'machine/bus.ph';
    require 'dev/tc/tcreg.ph';
    require 'machine/tc_machdep.ph';
    if(1) {
	require 'machine/intr.ph';
	eval 'sub tc_intrlevel_t () {\'int\';}' unless defined(&tc_intrlevel_t);
	eval 'sub TC_IPL_NONE () { &IPL_NONE;}' unless defined(&TC_IPL_NONE);
	eval 'sub TC_IPL_BIO () { &IPL_BIO;}' unless defined(&TC_IPL_BIO);
	eval 'sub TC_IPL_NET () { &IPL_NET;}' unless defined(&TC_IPL_NET);
	eval 'sub TC_IPL_TTY () { &IPL_TTY;}' unless defined(&TC_IPL_TTY);
	eval 'sub TC_IPL_CLOCK () { &IPL_CLOCK;}' unless defined(&TC_IPL_CLOCK);
    }
    eval 'sub tccf_slot () { $cf_loc[0];}' unless defined(&tccf_slot);
    eval 'sub tccf_offset () { $cf_loc[1];}' unless defined(&tccf_offset);
    eval 'sub TCCF_SLOT_UNKNOWN () {-1;}' unless defined(&TCCF_SLOT_UNKNOWN);
    eval 'sub TCCF_OFFSET_UNKNOWN () {-1;}' unless defined(&TCCF_OFFSET_UNKNOWN);
    eval 'sub TC_SPEED_12_5_MHZ () {0;}' unless defined(&TC_SPEED_12_5_MHZ);
    eval 'sub TC_SPEED_25_MHZ () {1;}' unless defined(&TC_SPEED_25_MHZ);
}
1;
