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

* Aarch64: operations affect always the full 64 bit register, so

Browse Source 
TCpuAsmOptimizer.RegLoadedWithNewValue can use SuperRegistersEq
This commit is contained in:
florian 2022-01-20 19:01:31 +01:00
parent a7a689ca16
commit a362c93f73
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/aarch64/aoptcpu.pas
View File

@ -114,7 +114,7 @@ Implementation
case p.oper[0]^.typ of case p.oper[0]^.typ of
top_reg: top_reg:
Result := (p.oper[0]^.reg = reg); Result := SuperRegistersEqual(p.oper[0]^.reg,reg);
top_ref: top_ref:
Result := Result :=
(taicpu(p).oper[0]^.ref^.addressmode in [AM_PREINDEXED,AM_POSTINDEXED]) and (taicpu(p).oper[0]^.ref^.addressmode in [AM_PREINDEXED,AM_POSTINDEXED]) and