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

+ MovzMovz2Movz optimization

Browse Source
This commit is contained in:
florian 2022-08-29 21:36:03 +02:00
parent a93942cd27
commit 5a60eac0c8
1 changed files with 15 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
compiler/aarch64/aoptcpu.pas
View File

@ -610,6 +610,21 @@ Implementation
Exit;
end;
end;
{
remove the second Movz from
movz reg,...
movz reg,...
}
if GetNextInstructionUsingReg(p,hp1,taicpu(p).oper[0]^.reg) and
MatchInstruction(hp1,A_MOVZ,[C_None],[PF_none]) and
MatchOperand(taicpu(p).oper[0]^,taicpu(hp1).oper[0]^) then
begin
DebugMsg(SPeepholeOptimization + 'MovzMovz2Movz', p);
RemoveCurrentP(p);
Result:=true;
exit;
end;
end;
end;