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

* A_MOVSL renamed to A_MOVSD

Browse Source
This commit is contained in:
peter 2004-04-09 14:36:05 +00:00
parent 47789bef1c
commit ffb2785d2b
2 changed files with 11 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/i386/cgcpu.pas
View File

@ -242,7 +242,7 @@ unit cgcpu;
case opsize of
S_B : list.concat(Taicpu.Op_none(A_MOVSB,S_NO));
S_W : list.concat(Taicpu.Op_none(A_MOVSW,S_NO));
S_L : list.concat(Taicpu.Op_none(A_MOVSL,S_NO));
S_L : list.concat(Taicpu.Op_none(A_MOVSD,S_NO));
end;
ungetregister(list,NR_EDI);
ungetregister(list,NR_ECX);
@ -389,7 +389,10 @@ begin
end.
{
$Log$
Revision 1.47 2004-02-27 10:21:05 florian
Revision 1.48 2004-04-09 14:36:05 peter
* A_MOVSL renamed to A_MOVSD
Revision 1.47 2004/02/27 10:21:05 florian
* top_symbol killed
+ refaddr to treference added
+ refsymbol to treference added

9
compiler/x86/cgx86.pas
View File

@ -1459,12 +1459,12 @@ unit cgx86;
list.concat(Taicpu.op_none(A_MOVSQ,S_NO))
else
{$endif cpu64bit}
list.concat(Taicpu.op_none(A_MOVSL,S_NO));
list.concat(Taicpu.op_none(A_MOVSD,S_NO));
end;
if len>=4 then
begin
dec(len,4);
list.concat(Taicpu.op_none(A_MOVSL,S_NO));
list.concat(Taicpu.op_none(A_MOVSD,S_NO));
end;
if len>=2 then
begin
@ -1791,7 +1791,10 @@ unit cgx86;
end.
{
$Log$
Revision 1.119 2004-03-11 19:35:05 peter
Revision 1.120 2004-04-09 14:36:05 peter
* A_MOVSL renamed to A_MOVSD
Revision 1.119 2004/03/11 19:35:05 peter
* fixed concatcopy end bytes copy broken by 64bits patch
Revision 1.118 2004/03/10 22:52:03 peter