paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-12 23:09:40 +02:00
Code Issues Packages Projects Releases Wiki Activity

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)

Browse Source 
git-svn-id: trunk@38976 -
This commit is contained in:
pierre 2018-05-11 15:52:48 +00:00
parent 7778c7d8ae
commit 5f8f00dcd3
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/inc/system.inc
View File

@ -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}