require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&ha_id)) {
    sub ha_id () {	 $ha_info[0];}
}
unless(defined(&HIL_DEVICE_KEYBOARD)) {
    sub HIL_DEVICE_KEYBOARD () {	1;}
}
unless(defined(&HIL_DEVICE_IDMODULE)) {
    sub HIL_DEVICE_IDMODULE () {	2;}
}
unless(defined(&HIL_DEVICE_MOUSE)) {
    sub HIL_DEVICE_MOUSE () {	3;}
}
unless(defined(&HIL_DEVICE_BUTTONBOX)) {
    sub HIL_DEVICE_BUTTONBOX () {	4;}
}
unless(defined(&hd_code)) {
    sub hd_code () {	 ($sc_hildev->{sc_code});}
}
unless(defined(&hd_fn)) {
    sub hd_fn () {	 ($sc_hildev->{sc_fn});}
}
unless(defined(&hd_info)) {
    sub hd_info () {	 ($sc_hildev->{sc_info});}
}
unless(defined(&hd_infolen)) {
    sub hd_infolen () {	 ($sc_hildev->{sc_infolen});}
}
unless(defined(&hd_parent)) {
    sub hd_parent () {	 ($sc_hildev->{sc_dev}->{dv_parent});}
}
unless(defined(&hd_type)) {
    sub hd_type () {	 ($sc_hildev->{sc_type});}
}
1;
