diff --git a/rtl/arm/arm.inc b/rtl/arm/arm.inc
index 923067f5dd..a5595c5abf 100644
--- a/rtl/arm/arm.inc
+++ b/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}
diff --git a/rtl/arm/math.inc b/rtl/arm/math.inc
index f332b10c36..5781b8730c 100644
--- a/rtl/arm/math.inc
+++ b/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}