Переглянути джерело

* continued to fix mips rtl compilation

git-svn-id: trunk@20257 -
florian 13 роки тому
батько
коміт
b8f322e0de
1 змінених файлів з 0 додано та 14 видалено
  1. 0 14
      rtl/mips/math.inc

+ 0 - 14
rtl/mips/math.inc

@@ -14,8 +14,6 @@
 
  **********************************************************************}
 
-{$ifdef INTERNCONSTINTF}
-
 {$ifndef FPC_SYSTEM_HAS_ABS}
     {$define FPC_SYSTEM_HAS_ABS}
     function fpc_abs_real(d : valreal) : valreal;compilerproc;
@@ -46,15 +44,3 @@
     end;
 {$endif}
 
-{$else}
-
-    {$define FPC_SYSTEM_HAS_ABS}
-    function abs(d : extended) : extended;[internproc:fpc_in_abs_real];
-
-    {$define FPC_SYSTEM_HAS_SQR}
-    function sqr(d : extended) : extended;[internproc:fpc_in_sqr_real];
-
-    {$define FPC_SYSTEM_HAS_SQRT}
-    function sqrt(d : extended) : extended;[internproc:fpc_in_sqrt_real];
-
-{$endif}