* floating point division by zero should throw run time error 208, fixed

git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@46210 3ad0048d-3df7-0310-abae-a5850022a9f2

4 files changed, 4 insertions, 4 deletions

diff --git a/rtl/netbsd/arm/sighnd.inc b/rtl/netbsd/arm/sighnd.inc
index 6546f18b97..5fa37e00c8 100644
--- a/rtl/netbsd/arm/sighnd.inc
+++ b/rtl/netbsd/arm/sighnd.inc
@@ -33,7 +33,7 @@ begin
     res:=0;
     if signo = SIGFPE then
      begin
-        res := 200;
+        res := 208;
      end
     else
     if (signo = SIGILL) or (signo = SIGBUS) or (signo = SIGSEGV) then
diff --git a/rtl/netbsd/m68k/sighnd.inc b/rtl/netbsd/m68k/sighnd.inc
index c2f61066e6..df510bb5ec 100644
--- a/rtl/netbsd/m68k/sighnd.inc
+++ b/rtl/netbsd/m68k/sighnd.inc
@@ -26,7 +26,7 @@ begin
     res:=0;
     if signo = SIGFPE then
      begin
-        res := 200;
+        res := 208;
      end
     else
     if (signo = SIGILL) or (signo = SIGBUS) or (signo = SIGSEGV) then
diff --git a/rtl/netbsd/powerpc/sighnd.inc b/rtl/netbsd/powerpc/sighnd.inc
index d34cf9a2be..639d2c57df 100644
--- a/rtl/netbsd/powerpc/sighnd.inc
+++ b/rtl/netbsd/powerpc/sighnd.inc
@@ -27,7 +27,7 @@ begin
     res:=0;
     if signo = SIGFPE then
      begin
-        res := 200;
+        res := 208;
      end
     else
     if (signo = SIGILL) or (signo = SIGBUS) or (signo = SIGSEGV) then
diff --git a/rtl/netbsd/x86_64/sighnd.inc b/rtl/netbsd/x86_64/sighnd.inc
index 2d6676ec94..5cbe084c6c 100644
--- a/rtl/netbsd/x86_64/sighnd.inc
+++ b/rtl/netbsd/x86_64/sighnd.inc
@@ -73,7 +73,7 @@ begin
             begin
               { first check the more precise options }
               if (FpuState and FPU_DivisionByZero)<>0 then
-                res:=200
+                res:=208
               else if (FpuState and FPU_Overflow)<>0 then
                 res:=205
               else if (FpuState and FPU_Underflow)<>0 then