mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-09 07:08:29 +02:00
* fixed fpu rte code for invalid, inexact and "subscript out of range"
errors (216 -> 207) git-svn-id: trunk@7453 -
This commit is contained in:
parent
7e3b792713
commit
eac195fc51
@ -52,7 +52,6 @@ begin
|
||||
case sig of
|
||||
SIGFPE :
|
||||
begin
|
||||
res := 207;
|
||||
case siginfo^.si_code of
|
||||
FPE_INTDIV:
|
||||
res:=200;
|
||||
@ -64,10 +63,6 @@ begin
|
||||
res:=205;
|
||||
FPE_FLTUND:
|
||||
res:=206;
|
||||
FPE_FLTRES,
|
||||
FPE_FLTINV,
|
||||
FPE_FLTSUB:
|
||||
res:=216;
|
||||
else
|
||||
res:=207;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user