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.