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

+ Mov2Nop optimization

Browse Source 
git-svn-id: trunk@36201 -
This commit is contained in:
florian 2017-05-13 09:58:27 +00:00
parent f4a29bb75d
commit 3ade6ae9b8
1 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
compiler/x86/aoptx86.pas
View File

@ -1028,6 +1028,17 @@ unit aoptx86;
GetNextIntruction_p : Boolean; GetNextIntruction_p : Boolean;
begin begin
Result:=false; Result:=false;
{ remove mov reg1,reg1? }
if MatchOperand(taicpu(p).oper[0]^,taicpu(p).oper[1]^) then
begin
GetNextInstruction(p, hp1);
DebugMsg('PeepHole Optimization,Mov2Nop',p);
asml.remove(p);
p.free;
p:=hp1;
Result:=true;
exit;
end;
GetNextIntruction_p:=GetNextInstruction(p, hp1); GetNextIntruction_p:=GetNextInstruction(p, hp1);
if GetNextIntruction_p and if GetNextIntruction_p and
MatchInstruction(hp1,A_AND,[]) and MatchInstruction(hp1,A_AND,[]) and
@ -1081,6 +1092,7 @@ unit aoptx86;
asml.remove(hp1); asml.remove(hp1);
hp1.free; hp1.free;
ReleaseUsedRegs(TmpUsedRegs); ReleaseUsedRegs(TmpUsedRegs);
Result:=true;
Exit; Exit;
end; end;
top_ref: top_ref:
@ -1099,6 +1111,7 @@ unit aoptx86;
asml.remove(hp1); asml.remove(hp1);
hp1.free; hp1.free;
ReleaseUsedRegs(TmpUsedRegs); ReleaseUsedRegs(TmpUsedRegs);
Result:=true;
Exit; Exit;
end; end;
end; end;