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

x86: Some oversights fixed where another iteration of pass 1 wasn't performed when it should have been

Browse Source
This commit is contained in:
J. Gareth "Curious Kit" Moreton 2023-03-03 12:38:04 +00:00 committed by FPK
parent 1fad287896
commit ecf2ad3e53
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/x86/aoptx86.pas
View File

@ -4278,6 +4278,8 @@ unit aoptx86;
hp3 := tai(hp2.Previous); hp3 := tai(hp2.Previous);
RemoveInstruction(hp2); RemoveInstruction(hp2);
Include(OptsToCheck, aoc_ForceNewIteration);
{ See if there's more we can optimise } { See if there's more we can optimise }
Continue; Continue;
end end
@ -4381,7 +4383,8 @@ unit aoptx86;
{ Same value - register hasn't changed } { Same value - register hasn't changed }
DebugMsg(SPeepholeOptimization + 'Mov2Nop 2 done', hp2); DebugMsg(SPeepholeOptimization + 'Mov2Nop 2 done', hp2);
RemoveInstruction(hp2); RemoveInstruction(hp2);
Result := True;
Include(OptsToCheck, aoc_ForceNewIteration);
{ See if there's more we can optimise } { See if there's more we can optimise }
Continue; Continue;