From 43538416e37d26d8bea7b2fb2bada8c52b24b236 Mon Sep 17 00:00:00 2001 From: Pierre Muller Date: Wed, 2 Apr 2025 16:23:21 +0000 Subject: [PATCH] Handle ADR LDM and STM arm instructions in taicpu.spilling_get_operation_type method --- compiler/arm/aasmcpu.pas | 30 ++++++++++++++++++++++++++++++ 1 file changed, 30 insertions(+) diff --git a/compiler/arm/aasmcpu.pas b/compiler/arm/aasmcpu.pas index 61eb32a82f..4f4b4892f1 100644 --- a/compiler/arm/aasmcpu.pas +++ b/compiler/arm/aasmcpu.pas @@ -832,6 +832,21 @@ implementation result:=operand_read; A_STREX: 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 internalerror(200403151); end @@ -923,6 +938,21 @@ implementation result:=operand_read; A_STREX: 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 begin writeln(opcode);