{ ************************************************
  * Asuro
  * Unit: Drivers/ISR17
  * Description: Alignment Check Exception
  ************************************************
  * Author: K Morris
  * Contributors: 
  ************************************************ }

unit ACE;

interface

uses
    util,
    console,
    isr_types,
    isrmanager,
    IDT;

procedure register();

implementation

procedure Main();
var
    i : integer;
    
begin
    CLI;
    BSOD('AC', 'Alignment Check Exception.');
    console.writestringln('Alignment Check Exception.');
    util.halt_and_catch_fire;
end;

procedure register();
begin
    isrmanager.registerISR(17, @Main);
    //memset(uint32(@Hooks[0]), 0, sizeof(pp_hook_method)*MAX_HOOKS);
    //IDT.set_gate(17, uint32(@Main), $08, ISR_RING_0);
end;

end.