From 353be907c76801e05832396087c5b653b301d7d7 Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Sun, 3 Feb 2019 21:00:57 +0000 Subject: [PATCH] * update the stack alignment field of parameters when doing so for paralocs git-svn-id: trunk@41204 - --- compiler/arm/cpupara.pas | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/compiler/arm/cpupara.pas b/compiler/arm/cpupara.pas index 9a00dcaf66..6c40f62100 100644 --- a/compiler/arm/cpupara.pas +++ b/compiler/arm/cpupara.pas @@ -458,7 +458,10 @@ unit cpupara; if (nextintreg in [RS_R1,RS_R3]) then inc(nextintreg) else if nextintreg>RS_R3 then - stack_offset:=align(stack_offset,8); + begin + stack_offset:=align(stack_offset,8); + hp.paraloc[side].Alignment:=8; + end; end; if nextintreg<=RS_R3 then begin @@ -573,7 +576,10 @@ unit cpupara; if (target_info.abi in [abi_eabi,abi_eabihf]) and firstparaloc and (paradef.alignment=8) then - stack_offset:=align(stack_offset,8); + begin + stack_offset:=align(stack_offset,8); + hp.paraloc[side].Alignment:=8; + end; paraloc^.loc:=LOC_REFERENCE; paraloc^.reference.index:=NR_STACK_POINTER_REG;