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

Handle ADR LDM and STM arm instructions

Browse Source 
in taicpu.spilling_get_operation_type method
This commit is contained in:
Pierre Muller 2025-04-02 16:23:21 +00:00
parent a797828619
commit 43538416e3
1 changed files with 30 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
compiler/arm/aasmcpu.pas
View File

@ -832,6 +832,21 @@ implementation
result:=operand_read; result:=operand_read;
A_STREX: A_STREX:
result:=operand_write; result:=operand_write;
A_LDM:
if opnr=0 then
result:=operand_readwrite
else
result:=operand_write;
A_STM:
if opnr=0 then
result:=operand_readwrite
else
result:=operand_read;
A_ADR:
if opnr=0 then
result:=operand_write
else
result:=operand_read;
else else
internalerror(200403151); internalerror(200403151);
end end
@ -923,6 +938,21 @@ implementation
result:=operand_read; result:=operand_read;
A_STREX: A_STREX:
result:=operand_write; result:=operand_write;
A_LDM:
if opnr=0 then
result:=operand_readwrite
else
result:=operand_write;
A_STM:
if opnr=0 then
result:=operand_readwrite
else
result:=operand_read;
A_ADR:
if opnr=0 then
result:=operand_write
else
result:=operand_read;
else else
begin begin
writeln(opcode); writeln(opcode);