Просмотр исходного кода

Update SIGFPE handling in sighnd.inc

Curtis Hamilton 1 месяц назад
Родитель
Сommit
b0dbdf0a67
1 измененных файлов с 2 добавлено и 1 удалено
  1. 2 1
      rtl/freebsd/powerpc64/sighnd.inc

+ 2 - 1
rtl/freebsd/powerpc64/sighnd.inc

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