paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 05:39:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* add $ifdef for move

Browse Source
This commit is contained in:
peter 2005-02-07 22:17:48 +00:00
parent 6e766b7261
commit f089ddabd6
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/sparc/sparc.inc
View File

@ -90,6 +90,7 @@ function Sptr:Pointer;assembler;nostackframe;
end; end;
{$ifndef FPC_SYSTEM_HAS_MOVE}
{$define FPC_SYSTEM_HAS_MOVE} {$define FPC_SYSTEM_HAS_MOVE}
procedure Move(const source;var dest;count:longint);[public, alias: 'FPC_MOVE'];assembler; procedure Move(const source;var dest;count:longint);[public, alias: 'FPC_MOVE'];assembler;
{ {
@ -287,6 +288,7 @@ procedure Move(const source;var dest;count:longint);[public, alias: 'FPC_MOVE'];
nop nop
.Lmoveexit: .Lmoveexit:
end; end;
{$endif FPC_SYSTEM_HAS_MOVE}
{**************************************************************************** {****************************************************************************
@ -360,7 +362,10 @@ end;
{ {
$Log$ $Log$
Revision 1.18 2005-01-27 21:26:39 florian Revision 1.19 2005-02-07 22:17:48 peter
* add $ifdef for move
Revision 1.18 2005/01/27 21:26:39 florian
+ getgot function added + getgot function added
Revision 1.17 2005/01/18 20:37:26 florian Revision 1.17 2005/01/18 20:37:26 florian