Added console output to ISRs.
git-svn-id: https://spexeah.com:8443/svn/Asuro@55 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
parent
6f6d274b69
commit
d4ae7666b4
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Debug Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Bad TSS Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Segment Not Present Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Stack Fault Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('General Protection Fault.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Page Fault.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Unknown Interrupt Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Coprocessor Fault Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Alignment Check Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Machine Check Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('NMI Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Breakpoint Exception');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('IDO Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('OOB Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,8 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Invalid OPCode Exception.');
|
||||||
|
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('No Coprocessor Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Double Fault.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -23,6 +23,7 @@ implementation
|
|||||||
|
|
||||||
procedure Main(); interrupt;
|
procedure Main(); interrupt;
|
||||||
begin
|
begin
|
||||||
|
console.writestringln('Coprocessor Seg Overrun Exception.');
|
||||||
util.halt_and_catch_fire;
|
util.halt_and_catch_fire;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -60,6 +60,7 @@ begin
|
|||||||
console.writeint(((mbinfo^.mem_upper + 1000) div 1024) +1);
|
console.writeint(((mbinfo^.mem_upper + 1000) div 1024) +1);
|
||||||
console.writestringln('MB');
|
console.writestringln('MB');
|
||||||
console.setdefaultattribute(console.combinecolors(lYellow, Black));
|
console.setdefaultattribute(console.combinecolors(lYellow, Black));
|
||||||
|
//asm INT 3 end;
|
||||||
util.halt_and_dont_catch_fire;
|
util.halt_and_dont_catch_fire;
|
||||||
{while true do begin
|
{while true do begin
|
||||||
c:= keyboard.get_scancode;
|
c:= keyboard.get_scancode;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user