From 2f02a97fce0938564178e8fb6147d39bd667f458 Mon Sep 17 00:00:00 2001 From: aaron Date: Wed, 17 May 2017 12:37:07 +0000 Subject: [PATCH] git-svn-id: https://spexeah.com:8443/svn/Asuro@45 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c --- src/drivers/isr32.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/drivers/isr32.pas b/src/drivers/isr32.pas index 643a3e55..89445f5e 100644 --- a/src/drivers/isr32.pas +++ b/src/drivers/isr32.pas @@ -11,7 +11,7 @@ type pp_void : procedure(); var - proc_ptr : pp_void; + procedure_ptr : pp_void = nil; procedure register(); @@ -21,7 +21,7 @@ procedure Main; interrupt; //IRQ0, called every 55ms begin CLI; if(proc_ptr <> nil) then begin - proc_ptr(); + procedure_ptr(); end; outb($0020, $20); end;