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

* do OpCmp2OpS optimization also if after cmp follows an appropriate mov

Browse Source 
git-svn-id: trunk@26801 -
This commit is contained in:
florian 2014-02-16 18:39:55 +00:00
parent c3a0d0ece3
commit ac85d44899
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/arm/aoptcpu.pas
View File

@ -573,7 +573,10 @@ Implementation
N := result[31];
EQ = Z=1; NE = Z=0;
MI = N=1; PL = N=0; }
MatchInstruction(hp2, A_B, [C_EQ,C_NE,C_MI,C_PL], []) and
(MatchInstruction(hp2, A_B, [C_EQ,C_NE,C_MI,C_PL], []) or
{ mov is also possible, but only if there is no shifter operand, it could be an rxx,
we are too lazy to check if it is rxx or something else }
(MatchInstruction(hp2, A_MOV, [C_EQ,C_NE,C_MI,C_PL], []) and (taicpu(hp2).ops=2))) and
assigned(FindRegDealloc(NR_DEFAULTFLAGS,tai(hp2.Next))) then
begin
DebugMsg('Peephole OpCmp2OpS done', p);