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

* generate AND for small set comparisons also when only set vars are involved using the cg class, so it works for arm thumb as well

Browse Source 
git-svn-id: trunk@28569 -
This commit is contained in:
florian 2014-08-31 20:43:13 +00:00
parent 8a7c16327c
commit 2fa7171a45
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/narmadd.pas
View File

@ -395,7 +395,7 @@ interface
end end
else else
begin begin
current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg_reg(A_AND,tmpreg,left.location.register,right.location.register)); cg.a_op_reg_reg_reg(current_asmdata.CurrAsmList,OP_AND,OS_32,left.location.register,right.location.register,tmpreg);
cg.a_reg_alloc(current_asmdata.CurrAsmList,NR_DEFAULTFLAGS); cg.a_reg_alloc(current_asmdata.CurrAsmList,NR_DEFAULTFLAGS);
current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_CMP,tmpreg,right.location.register)); current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_CMP,tmpreg,right.location.register));
end; end;