blob: 56f1fe80f1ab8a1b6560166bd5d9009babeddf79 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
{$ifdef NDS_INTERFACE}
const
EXCEPTION_VECTOR : ^VoidFn = pointer($2FFFD9C);
var
exceptionC: ^VoidFn; cvar; external;
exceptionStack: cuint32; cvar; external;
exceptionRegisters: pcint32; cvar; external;
procedure enterException(); cdecl; external;
procedure setExceptionHandler(handler: VoidFn); cdecl; external;
procedure defaultExceptionHandler(); cdecl; external;
function getCPSR(): cuint32; cdecl; external;
{$endif NDS_INTERFACE}
|