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

* arm thumb does not support ror reg1,reg2,#imm

Browse Source 
git-svn-id: trunk@25355 -
This commit is contained in:
florian 2013-08-23 18:41:24 +00:00
parent 950194678a
commit f34bee1df7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/arm/cgcpu.pas
View File

@ -4052,7 +4052,7 @@ unit cgcpu;
list.concat(taicpu.op_reg_reg_const(op_reg_reg_opcg2asmop[op],dst,dst,imm2)); list.concat(taicpu.op_reg_reg_const(op_reg_reg_opcg2asmop[op],dst,dst,imm2));
end end
{$endif DUMMY} {$endif DUMMY}
else if (op in [OP_SHL, OP_SHR, OP_SAR, OP_ROR]) then else if (op in [OP_SHL, OP_SHR, OP_SAR]) then
begin begin
list.concat(taicpu.op_reg_reg_const(op_reg_opcg2asmop[op],dst,dst,a)); list.concat(taicpu.op_reg_reg_const(op_reg_opcg2asmop[op],dst,dst,a));
end end