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

* Use a register alias while handling reg deallocs in trgobj.instr_spill_register()

Browse Source 
to be in sync with commit b96057ad.
This commit is contained in:
Yuriy Sydorov 2021-09-09 16:32:55 +03:00
parent ba9a8ab069
commit 61cf121533
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/rgobj.pas
View File

@ -2820,7 +2820,7 @@ unit rgobj;
belong to the previous instruction and not the current instruction } belong to the previous instruction and not the current instruction }
if (tai_regalloc(loadpos).instr=instr) and if (tai_regalloc(loadpos).instr=instr) and
(tai_regalloc(loadpos).ratype=ra_dealloc) then (tai_regalloc(loadpos).ratype=ra_dealloc) then
live_registers.add(getsupreg(tai_regalloc(loadpos).reg)); live_registers.add(get_alias(getsupreg(tai_regalloc(loadpos).reg)));
loadpos:=tai(loadpos.previous); loadpos:=tai(loadpos.previous);
end; end;
loadpos:=tai(loadpos.next); loadpos:=tai(loadpos.next);