Преглед на файлове

* fixed arm-linux compilation with FPC_USE_LIBC

git-svn-id: trunk@8809 -
florian преди 18 години
родител
ревизия
76b95fb058
променени са 2 файла, в които са добавени 4 реда и са изтрити 1 реда
  1. 2 1
      rtl/arm/arm.inc
  2. 2 0
      rtl/arm/math.inc

+ 2 - 1
rtl/arm/arm.inc

@@ -87,6 +87,7 @@ asm
 end ['R0'];
 
 
+{$ifndef FPC_SYSTEM_HAS_FILLCHAR}
 {$define FPC_SYSTEM_HAS_FILLCHAR}
 Procedure FillChar(var x;count:longint;value:byte);assembler;nostackframe;
 asm
@@ -136,7 +137,7 @@ asm
         strb r2,[r3],#1
         mov pc,lr
 end;
-
+{$endif FPC_SYSTEM_HAS_FILLCHAR}
 
 {$ifndef FPC_SYSTEM_HAS_MOVE}
 {$define FPC_SYSTEM_HAS_MOVE}

+ 2 - 0
rtl/arm/math.inc

@@ -29,6 +29,7 @@
       runerror(207);
       result:=0;
     end;
+    {$ifndef FPC_SYSTEM_HAS_SQRT}
     {$define FPC_SYSTEM_HAS_SQRT}
     function fpc_sqrt_real(d : ValReal) : ValReal;compilerproc;
     begin
@@ -36,6 +37,7 @@
       runerror(207);
       result:=0;
     end;
+    {$endif FPC_SYSTEM_HAS_SQRT}
 {$endif}
     (* atn isn't supported by the linux fpe it seems
     {$define FPC_SYSTEM_HAS_ARCTAN}