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';
    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;
