From 5f8f00dcd3765d4115bb21bf608a17c756e98774 Mon Sep 17 00:00:00 2001 From: pierre Date: Fri, 11 May 2018 15:52:48 +0000 Subject: [PATCH] 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 - --- rtl/inc/system.inc | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/rtl/inc/system.inc b/rtl/inc/system.inc index cffc2ffff6..6ffe7e1c8e 100644 --- a/rtl/inc/system.inc +++ b/rtl/inc/system.inc @@ -128,6 +128,10 @@ function do_isdevice(handle:thandle):boolean;forward; ****************************************************************************} {$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 in the compiler. So, we use the internal implementation for now 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 } {$i cgenstr.inc} {$endif} +{$ifdef USE_CPU_MOVE} + { Avoid use of generic C code for move procedure } + {$undef FPC_SYSTEM_HAS_MOVE} +{$endif} {$endif FPC_USE_LIBC} {$ifdef cpui386}