소스 검색

* 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}