diff options
| author | pierre <pierre@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2020-10-27 23:09:32 +0000 |
|---|---|---|
| committer | pierre <pierre@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2020-10-27 23:09:32 +0000 |
| commit | 4ba587a50007d2b3b78918581c892300c77b26f3 (patch) | |
| tree | b45e5912c2f16b0c388785868fdd4f5e3cade3fb /rtl/netbsd | |
| parent | ea96ef7d7cfcf4cdd7154bae9b37c339abba0cfb (diff) | |
| download | fpc-4ba587a50007d2b3b78918581c892300c77b26f3.tar.gz | |
Use RTE 207 for FPU_Invalid and FPU_Denormal exceptions on i386/x86_64 beos/haiku/*bsd as for Linux
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@47227 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'rtl/netbsd')
| -rw-r--r-- | rtl/netbsd/i386/sighnd.inc | 6 | ||||
| -rw-r--r-- | rtl/netbsd/x86_64/sighnd.inc | 4 |
2 files changed, 5 insertions, 5 deletions
diff --git a/rtl/netbsd/i386/sighnd.inc b/rtl/netbsd/i386/sighnd.inc index 155accb142..20658a8b33 100644 --- a/rtl/netbsd/i386/sighnd.inc +++ b/rtl/netbsd/i386/sighnd.inc @@ -76,12 +76,12 @@ begin res:=205 else if FpuState = FPE_FltUnd then res:=206 - { else if FpuState and FPU_Denormal)<>0 then - res:=216 } + else if FpuState and FPU_Denormal)<>0 then + res:=207 else if FpuState = FPE_FltSub then res:=207 else if FpuState = FPE_FltInv then - res:=216 + res:=207 else res:=207; {'Coprocessor Error'} end; diff --git a/rtl/netbsd/x86_64/sighnd.inc b/rtl/netbsd/x86_64/sighnd.inc index 5cbe084c6c..242aaba906 100644 --- a/rtl/netbsd/x86_64/sighnd.inc +++ b/rtl/netbsd/x86_64/sighnd.inc @@ -79,11 +79,11 @@ begin else if (FpuState and FPU_Underflow)<>0 then res:=206 else if (FpuState and FPU_Denormal)<>0 then - res:=216 + res:=207 else if (FpuState and (FPU_StackOverflow or FPU_StackUnderflow))<>0 then res:=207 else if (FpuState and FPU_Invalid)<>0 then - res:=216 + res:=207 else res:=207; {'Coprocessor Error'} end; |