From 870d612e155199c0d76af4f47c49718acae6f442 Mon Sep 17 00:00:00 2001
From: Pierre Muller <pierre@freepascal.org>
Date: Wed, 8 Jun 2022 00:20:57 +0200
Subject: [PATCH] Fix compilation of m68k-linux rtl with -dFPC_USE_LIBC

---
 rtl/m68k/m68k.inc | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/rtl/m68k/m68k.inc b/rtl/m68k/m68k.inc
index 63f4db50fe..c644d0b450 100644
--- a/rtl/m68k/m68k.inc
+++ b/rtl/m68k/m68k.inc
@@ -130,6 +130,7 @@ asm
 end;
 
 
+{$ifndef FPC_SYSTEM_HAS_FILLCHAR}
 {$define FPC_SYSTEM_HAS_FILLCHAR}
 procedure FillChar(var x; count : longint; value : byte); assembler; register; nostackframe;
 asm
@@ -258,7 +259,7 @@ asm
   bne      @LfillByte
 @Lquit:
 end;
-
+{$endif ndef FPC_SYSTEM_HAS_FILLCHAR}
 
 {$ifdef dummy}
 {    procedure strcopy(dstr,sstr : pointer;len : longint);[public,alias: 'STRCOPY'];}
@@ -394,6 +395,7 @@ end;
 {$endif dummy}
 
 
+{$ifndef FPC_SYSTEM_HAS_MOVE}
 {$define FPC_SYSTEM_HAS_MOVE}
 procedure move(const source;var dest;count : longint); assembler;
 { base pointer+8 = source                  }
@@ -446,6 +448,7 @@ asm
   { end fast loop mode }
   @LMOVE5:
 end;
+{$endif ndef FPC_SYSTEM_HAS_MOVE}
 
 
 {$ifdef CPUM68K_HAS_UNALIGNED}