paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-19 15:11:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed fpu rte code for invalid, inexact and "subscript out of range"

Browse Source 
errors (216 -> 207)

git-svn-id: trunk@7453 -
This commit is contained in:
Jonas Maebe 2007-05-24 12:02:23 +00:00
parent 7e3b792713
commit eac195fc51
1 changed files with 0 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
rtl/solaris/sparc/sighnd.inc
View File

@ -52,7 +52,6 @@ begin
case sig of case sig of
SIGFPE : SIGFPE :
begin begin
res := 207;
case siginfo^.si_code of case siginfo^.si_code of
FPE_INTDIV: FPE_INTDIV:
res:=200; res:=200;
@ -64,10 +63,6 @@ begin
res:=205; res:=205;
FPE_FLTUND: FPE_FLTUND:
res:=206; res:=206;
FPE_FLTRES,
FPE_FLTINV,
FPE_FLTSUB:
res:=216;
else else
res:=207; res:=207;
end; end;