Browse Source

* fixed missing offset assignment

git-svn-id: trunk@984 -
florian 20 years ago
parent
commit
609f35b34c
1 changed files with 1 additions and 0 deletions
  1. 1 0
      compiler/arm/cpupara.pas

+ 1 - 0
compiler/arm/cpupara.pas

@@ -316,6 +316,7 @@ unit cpupara;
                             paraloc^.size:=int_cgsize(paralen);
                             paraloc^.size:=int_cgsize(paralen);
                             if (side=callerside) then
                             if (side=callerside) then
                               paraloc^.reference.index:=NR_STACK_POINTER_REG;
                               paraloc^.reference.index:=NR_STACK_POINTER_REG;
+                            paraloc^.reference.offset:=stack_offset;
                             inc(stack_offset,align(paralen,4));
                             inc(stack_offset,align(paralen,4));
                             paralen:=0;
                             paralen:=0;
                          end;
                          end;