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

* fixed register allocator problems with concatcopy

Browse Source
This commit is contained in:
florian 2004-01-21 15:41:56 +00:00
parent 75e2de9f2c
commit 3b21b99111
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/arm/cgcpu.pas
View File

@ -965,6 +965,10 @@ unit cgcpu;
ungetregister(list,r);
list.concat(setoppostfix(taicpu.op_reg_reg_const(A_SUB,countreg,countreg,1),PF_S));
list.concat(setcondition(taicpu.op_sym(A_B,l),C_NE));
{ keep the registers alive }
list.concat(taicpu.op_reg_reg(A_MOV,countreg,countreg));
list.concat(taicpu.op_reg_reg(A_MOV,srcreg,srcreg));
list.concat(taicpu.op_reg_reg(A_MOV,destreg,destreg));
end;
begin
@ -1203,7 +1207,10 @@ begin
end.
{
$Log$
Revision 1.32 2004-01-21 14:22:00 florian
Revision 1.33 2004-01-21 15:41:56 florian
* fixed register allocator problems with concatcopy
Revision 1.32 2004/01/21 14:22:00 florian
+ reintroduce implemented
Revision 1.31 2004/01/21 01:22:35 florian