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

* TX86AsmOptimizer.OptPass1MOVXX takes care of volatility

Browse Source
This commit is contained in:
florian 2021-10-23 23:40:09 +02:00
parent 7f1050464a
commit 4610980f2e
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/x86/aoptx86.pas
View File

@ -4126,14 +4126,16 @@ unit aoptx86;
DebugMsg(SPeepholeOptimization + 'MovXXMovXX2Nop 1 done',p); DebugMsg(SPeepholeOptimization + 'MovXXMovXX2Nop 1 done',p);
RemoveInstruction(hp1); RemoveInstruction(hp1);
RemoveCurrentp(p); { p will now be equal to the instruction that follows what was hp1 } RemoveCurrentp(p); { p will now be equal to the instruction that follows what was hp1 }
Result:=true;
exit;
end end
else else if (taicpu(hp1).oper[1]^.typ<>top_ref) or (not(vol_write in taicpu(hp1).oper[1]^.ref^.volatility)) then
begin begin
DebugMsg(SPeepholeOptimization + 'MovXXMovXX2MoVXX 1 done',p); DebugMsg(SPeepholeOptimization + 'MovXXMovXX2MoVXX 1 done',p);
RemoveInstruction(hp1); RemoveInstruction(hp1);
Result:=true;
exit;
end; end;
Result:=true;
exit;
end end
end; end;
end; end;