|
@@ -25,13 +25,14 @@ begin
|
|
|
SIGFPE:
|
|
SIGFPE:
|
|
|
begin
|
|
begin
|
|
|
case info^.si_code of
|
|
case info^.si_code of
|
|
|
|
|
+ FPE_FLTDIV: res := 200; { integer divide fault }
|
|
|
FPE_INTDIV: res := 200; { integer divide fault }
|
|
FPE_INTDIV: res := 200; { integer divide fault }
|
|
|
FPE_FLTOVF: res := 205; { overflow trap }
|
|
FPE_FLTOVF: res := 205; { overflow trap }
|
|
|
FPE_FLTUND: res := 206; { underflow }
|
|
FPE_FLTUND: res := 206; { underflow }
|
|
|
FPE_FLTRES: res := 216; { inexact result / device not available }
|
|
FPE_FLTRES: res := 216; { inexact result / device not available }
|
|
|
FPE_FLTINV: res := 216; { invalid floating point op }
|
|
FPE_FLTINV: res := 216; { invalid floating point op }
|
|
|
else
|
|
else
|
|
|
- res := 208; { generic coprocessor error }
|
|
|
|
|
|
|
+ res := 207; { generic coprocessor error }
|
|
|
end;
|
|
end;
|
|
|
sysResetFPU; { reset FPSCR on PowerPC64 }
|
|
sysResetFPU; { reset FPSCR on PowerPC64 }
|
|
|
end;
|
|
end;
|