paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-03 15:29:26 +01:00
Code Issues Packages Projects Releases Wiki Activity

+ fixed code generation for cmn

Browse Source
This commit is contained in:
florian 2004-03-10 22:35:40 +00:00
parent 7afabeb8a9
commit 164a5bb1d4
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/arm/cgcpu.pas
View File

@ -780,8 +780,8 @@ unit cgcpu;
list.concat(taicpu.op_reg_const(A_CMP,reg,a))
{ CMN reg,0 and CMN reg,$80000000 are different from CMP reg,$ffffffff
and CMP reg,$7fffffff regarding the flags according to the ARM manual }
else if is_shifter_const(not(a),b) and (a<>$7fffffff) and (a<>$ffffffff) then
list.concat(taicpu.op_reg_const(A_CMN,reg,not(a)))
else if is_shifter_const(-a,b) and (a<>$7fffffff) and (a<>$ffffffff) then
list.concat(taicpu.op_reg_const(A_CMN,reg,-a))
else
begin
tmpreg:=getintregister(list,size);
@ -1281,7 +1281,10 @@ begin
end.
{
$Log$
Revision 1.46 2004-03-06 20:35:19 florian
Revision 1.47 2004-03-10 22:35:40 florian
+ fixed code generation for cmn
Revision 1.46 2004/03/06 20:35:19 florian
* fixed arm compilation
* cleaned up code generation for exported linux procedures