Delphi-Quellcode:
procedure RunErrorAt(ErrCode: Integer; ErrorAtAddr: Pointer);
begin
ErrorAddr := ErrorAtAddr;
_Halt(ErrCode);
end;
Ohne SysUtils ladet man dort und mit SysUtils wird stattdessen für bekannte Fehler die entsprechende
Exception ausgelöst.