From 736212b77e43ba061b58e13f4b38cb929310cb60 Mon Sep 17 00:00:00 2001
From: aaron <aaron@6dbc8c32-bb84-406f-8558-d1cf31a0ab0c>
Date: Thu, 18 May 2017 12:39:45 +0000
Subject: [PATCH] git-svn-id: https://spexeah.com:8443/svn/Asuro@92
 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

---
 src/drivers/keyboard.pas | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/src/drivers/keyboard.pas b/src/drivers/keyboard.pas
index bc76c73b..93e354cb 100644
--- a/src/drivers/keyboard.pas
+++ b/src/drivers/keyboard.pas
@@ -18,7 +18,7 @@ uses
 
 
 type
-    TKeyInfo = bitpacked record 
+    TKeyInfo = packed record 
         key_code : byte;
         pressed : boolean;
     end;
@@ -37,9 +37,9 @@ implementation
 
 procedure init();  
 begin
-    console.writestring('b4');
     memset(uint32(@key_matrix[0]), 0, sizeof(TKeyInfo)*256);
-    console.writestring('aft');
+    memset(uint32(@key_buffer), 0, sizeof(TKeyInfo));
+
     key_matrix[1].key_code := $1B;
     key_matrix[2].key_code := $31;
     key_matrix[3].key_code := $32;
@@ -120,7 +120,8 @@ end;
 procedure callback(scan_code : void);
 
 begin
-    key_buffer := key_matrix[scan_code^];
+    key_buffer := key_matrix[integer(scan_code)];
+    console.writechar(char(key_buffer.key_code));
 end;
 
 end.
\ No newline at end of file