Browse Source

Fix compilation of m68k-linux rtl with -dFPC_USE_LIBC

(cherry picked from commit 870d612e155199c0d76af4f47c49718acae6f442)
Pierre Muller 3 years ago
parent
commit
db50354ac6
1 changed files with 4 additions and 1 deletions
  1. 4 1
      rtl/m68k/m68k.inc

+ 4 - 1
rtl/m68k/m68k.inc

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