From 2ba75775069c8731f6f1a0c7dedbd10d708f43c2 Mon Sep 17 00:00:00 2001
From: aaron <aaron@6dbc8c32-bb84-406f-8558-d1cf31a0ab0c>
Date: Wed, 17 May 2017 12:34:30 +0000
Subject: [PATCH] git-svn-id: https://spexeah.com:8443/svn/Asuro@44
 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

---
 src/drivers/isr32.pas | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/src/drivers/isr32.pas b/src/drivers/isr32.pas
index 51f050ed..643a3e55 100644
--- a/src/drivers/isr32.pas
+++ b/src/drivers/isr32.pas
@@ -7,6 +7,12 @@ uses
     console,
     IDT;
 
+type 
+    pp_void : procedure();
+
+var
+    proc_ptr : pp_void;
+
 procedure register();
 
 implementation
@@ -14,6 +20,9 @@ implementation
 procedure Main; interrupt; //IRQ0, called every 55ms
 begin
     CLI;
+    if(proc_ptr <> nil) then begin
+        proc_ptr();
+    end;
     outb($0020, $20);
 end;
 
@@ -22,4 +31,4 @@ begin
     IDT.set_gate(32, uint32(@Main), $08, ISR_RING_0);
 end;
 
-end.
\ No newline at end of file
+end.