git-svn-id: https://spexeah.com:8443/svn/Asuro@507 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
43
src/fault/DBGE.pas
Normal file
43
src/fault/DBGE.pas
Normal file
@ -0,0 +1,43 @@
|
||||
{ ************************************************
|
||||
* Asuro
|
||||
* Unit: Drivers/ISR1
|
||||
* Description: Debug Exception
|
||||
************************************************
|
||||
* Author: K Morris
|
||||
* Contributors:
|
||||
************************************************ }
|
||||
|
||||
unit DBGE;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
util,
|
||||
console,
|
||||
isr_types,
|
||||
isrmanager,
|
||||
IDT;
|
||||
|
||||
procedure register();
|
||||
|
||||
implementation
|
||||
|
||||
procedure Main();
|
||||
var
|
||||
i : integer;
|
||||
|
||||
begin
|
||||
CLI;
|
||||
BSOD('DE', 'Debug Exception');
|
||||
console.writestringln('Debug Exception.');
|
||||
util.halt_and_catch_fire;
|
||||
end;
|
||||
|
||||
procedure register();
|
||||
begin
|
||||
isrmanager.registerISR(1, @Main);
|
||||
//memset(uint32(@Hooks[0]), 0, sizeof(pp_hook_method)*MAX_HOOKS);
|
||||
//IDT.set_gate(1, uint32(@Main), $08, ISR_RING_0);
|
||||
end;
|
||||
|
||||
end.
|
Reference in New Issue
Block a user