paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-01-06 11:50:37 +01:00
Code Issues Packages Projects Releases Wiki Activity

* Made NaN = 0.0/0.0 for arm-linux. It is calculated as Nan on Florian's arm-linux box. ln(-1.0) is calculated as -Inf on arm-linux and x86. It fixes bug #9132.

Browse Source 
git-svn-id: trunk@8045 -
This commit is contained in:
yury 2007-07-14 08:55:54 +00:00
parent d4f033bb78
commit 1807613f88
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/objpas/math.pp
View File

@ -116,12 +116,7 @@ interface
{$define OverflowCheckWasOn}
{$Q-}
{$endif opt Q+}
{$if defined(CPUARM) and defined(unix)}
{ the ARM linux emulator doesn't like 0.0/0.0 }
NaN = ln(-1.0);
{$else CPUARM}
NaN = 0.0/0.0;
{$endif CPUARM}
Infinity = 1.0/0.0;
{$ifdef RangeCheckWasOn}
{$R+}