Browse Source

Allow to use CPU specific code for move procedure for systems using libc code with -dUSE_CPU_MOVE (allows easier testing for AIX, no effect by default)

git-svn-id: trunk@38976 -
pierre 7 years ago
parent
commit
5f8f00dcd3
1 changed files with 8 additions and 0 deletions
  1. 8 0
      rtl/inc/system.inc

+ 8 - 0
rtl/inc/system.inc

@@ -128,6 +128,10 @@ function do_isdevice(handle:thandle):boolean;forward;
 ****************************************************************************}
 ****************************************************************************}
 
 
 {$ifdef FPC_USE_LIBC}
 {$ifdef FPC_USE_LIBC}
+{$ifdef USE_CPU_MOVE}
+  { Avoid use of generic C code for move procedure }
+  {$define FPC_SYSTEM_HAS_MOVE}
+{$endif}
 { Under Haiku, bcopy cause a problem when searching for include file
 { Under Haiku, bcopy cause a problem when searching for include file
   in the compiler. So, we use the internal implementation for now
   in the compiler. So, we use the internal implementation for now
   under BeOS and Haiku.  }
   under BeOS and Haiku.  }
@@ -137,6 +141,10 @@ function do_isdevice(handle:thandle):boolean;forward;
 { is now declared as external reference to another routine in the interface }
 { is now declared as external reference to another routine in the interface }
 {$i cgenstr.inc}
 {$i cgenstr.inc}
 {$endif}
 {$endif}
+{$ifdef USE_CPU_MOVE}
+  { Avoid use of generic C code for move procedure }
+  {$undef FPC_SYSTEM_HAS_MOVE}
+{$endif}
 {$endif FPC_USE_LIBC}
 {$endif FPC_USE_LIBC}
 
 
 {$ifdef cpui386}
 {$ifdef cpui386}