require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&ADBK_CAPSLOCK)) {
    sub ADBK_CAPSLOCK () {	0x39;}
}
unless(defined(&ADBK_RESET)) {
    sub ADBK_RESET () {	0x7f;}
}
unless(defined(&ADBK_KEYVAL)) {
    sub ADBK_KEYVAL {
	my($key) = @_;
	eval q((($key) & 0x7f));
    }
}
unless(defined(&ADBK_PRESS)) {
    sub ADBK_PRESS {
	my($key) = @_;
	eval q(((($key) & 0x80) == 0));
    }
}
unless(defined(&ADBK_KEYDOWN)) {
    sub ADBK_KEYDOWN {
	my($key) = @_;
	eval q(($key));
    }
}
unless(defined(&ADBK_KEYUP)) {
    sub ADBK_KEYUP {
	my($key) = @_;
	eval q((($key) | 0x80));
    }
}
unless(defined(&KEYBOARD_ARRAY)) {
} else {
    require 'dev/wscons/wskbdraw.ph';
    if(defined(&FIX_SV_X_KBDBUG)) {
    } else {
    }
    if(defined(&FIX_SV_X_KBDBUG)) {
    } else {
    }
}
1;
