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

* handle adress registers properly in tcg64f68k.a_op64_reg_ref

Browse Source
This commit is contained in:
florian 2024-07-19 20:00:21 +02:00
parent b71b5b771f
commit 9f6a3eebb7
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/m68k/cgcpu.pas
View File

@ -2587,6 +2587,8 @@ unit cgcpu;
href: treference;
hreg: tregister;
begin
reg.reghi:=tcg68k(cg).force_to_dataregister(list,OS_32,reg.reghi);
reg.reglo:=tcg68k(cg).force_to_dataregister(list,OS_32,reg.reglo);
case op of
OP_AND,OP_OR,OP_XOR:
begin