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

* patch by J. Gareth Moreton: x86: Lea2Nop for stack pointer, resolves #39225

Browse Source 
git-svn-id: trunk@49612 -
This commit is contained in:
florian 2021-07-15 20:58:46 +00:00
parent 1c13db554c
commit 2629bd7ba9
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/x86/aoptx86.pas
View File

@ -3742,8 +3742,15 @@ unit aoptx86;
{ changes "lea (%reg1), %reg2" into "mov %reg1, %reg2" }
if (taicpu(p).oper[0]^.ref^.base <> NR_NO) and
(taicpu(p).oper[0]^.ref^.index = NR_NO) and
{ do not mess with leas acessing the stack pointer }
(taicpu(p).oper[1]^.reg <> NR_STACK_POINTER_REG) and
(
{ do not mess with leas accessing the stack pointer
unless it's a null operation }
(taicpu(p).oper[1]^.reg <> NR_STACK_POINTER_REG) or
(
(taicpu(p).oper[0]^.ref^.base = NR_STACK_POINTER_REG) and
(taicpu(p).oper[0]^.ref^.offset = 0)
)
) and
(not(Assigned(taicpu(p).oper[0]^.ref^.Symbol))) then
begin
if (taicpu(p).oper[0]^.ref^.offset = 0) then