Przeglądaj źródła

Update SIGFPE handling in sighnd.inc

Curtis Hamilton 1 miesiąc temu
rodzic
commit
b0dbdf0a67
1 zmienionych plików z 2 dodań i 1 usunięć
  1. 2 1
      rtl/freebsd/powerpc64/sighnd.inc

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

@@ -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;