ps2: fix PS2_SHIFT check

This commit is contained in:
Virgil Dupras 2020-05-21 08:53:36 -04:00
parent 223cb94466
commit e9e3bd80f6

View File

@ -10,6 +10,6 @@
DUP 0x7f > IF DROP (key) EXIT THEN DUP 0x7f > IF DROP (key) EXIT THEN
DUP _shift? IF DROP 1 PS2_SHIFT C! (key) EXIT THEN DUP _shift? IF DROP 1 PS2_SHIFT C! (key) EXIT THEN
( ah, finally, we have a gentle run-of-the-mill KC ) ( ah, finally, we have a gentle run-of-the-mill KC )
PS2_CODES PS2_SHIFT @ IF 0x80 + THEN + C@ PS2_CODES PS2_SHIFT C@ IF 0x80 + THEN + C@
DUP NOT IF DROP (key) THEN ; DUP NOT IF DROP (key) THEN ;