Spexeah/Asuro
Spexeah/Asuro
3
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

git-svn-id: https://spexeah.com:8443/svn/Asuro@45 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

Browse Source
This commit is contained in:
aaron 2017-05-17 12:37:07 +00:00
parent 2ba7577506
commit 2f02a97fce
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/drivers/isr32.pas
View File

@ -11,7 +11,7 @@ type
pp_void : procedure(); pp_void : procedure();
var var
proc_ptr : pp_void; procedure_ptr : pp_void = nil;
procedure register(); procedure register();
@ -21,7 +21,7 @@ procedure Main; interrupt; //IRQ0, called every 55ms
begin begin
CLI; CLI;
if(proc_ptr <> nil) then begin if(proc_ptr <> nil) then begin
proc_ptr(); procedure_ptr();
end; end;
outb($0020, $20); outb($0020, $20);
end; end;