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

* ARM: (V)LDM do not load from the registers in the reg. set

Browse Source 
git-svn-id: trunk@45525 -
This commit is contained in:
florian 2020-05-28 21:37:05 +00:00
parent 3f95fa50ef
commit 651f5cb8a1
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/arm/aoptcpu.pas
View File

@ -191,7 +191,11 @@ Implementation
else
;
end;
if instructionLoadsFromReg then exit; {Bailout if we found something}
if (i=0) and (p.opcode in [A_LDM,A_VLDM]) then
exit;
if instructionLoadsFromReg then
exit; {Bailout if we found something}
Inc(I);
end;
end;