From f1c1f6931b4c2565d7bc026ec3eeda4a70cf2dad Mon Sep 17 00:00:00 2001 From: aaron Date: Wed, 17 May 2017 13:04:37 +0000 Subject: [PATCH] git-svn-id: https://spexeah.com:8443/svn/Asuro@49 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c --- src/drivers/isr32.pas | 2 +- src/drivers/isr33.pas | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/src/drivers/isr32.pas b/src/drivers/isr32.pas index 83bc08a7..e38940db 100644 --- a/src/drivers/isr32.pas +++ b/src/drivers/isr32.pas @@ -8,7 +8,7 @@ uses IDT; type - pp_void : procedure(); + pp_void = procedure(); var procedure_ptr : pp_void = nil; diff --git a/src/drivers/isr33.pas b/src/drivers/isr33.pas index 98ab7131..cf4d126f 100644 --- a/src/drivers/isr33.pas +++ b/src/drivers/isr33.pas @@ -8,7 +8,7 @@ uses IDT; type - pp_byte : procedure(byte); + pp_byte = procedure(key_code : byte); var procedure_ptr : pp_byte = nil; @@ -23,6 +23,7 @@ begin if(procedure_ptr <> nil) then begin procedure_ptr(inb($60)); end; + console.writechar(inb($60)); outb($0020, $20); end;