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

* check used fpu type properly

Browse Source 
git-svn-id: trunk@6786 -
This commit is contained in:
florian 2007-03-11 17:17:06 +00:00
parent fb1afe0ea4
commit fd6fdfe896
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/arm/math.inc
View File

@ -14,7 +14,7 @@
**********************************************************************}
{$ifndef WINCE}
{$if defined(FPUFPA) or defined(FPUFPA10) or defined(FPUFPA11)}
{$define FPC_SYSTEM_HAS_ABS}
function fpc_abs_real(d : ValReal) : ValReal;compilerproc;
begin
@ -36,6 +36,7 @@
runerror(207);
result:=0;
end;
{$endif}
(* atn isn't supported by the linux fpe it seems
{$define FPC_SYSTEM_HAS_ARCTAN}
function fpc_arctan_real(d : extended) : extended;compilerproc;
@ -72,4 +73,3 @@
result:=0;
end;
*)
{$endif WINCE}