Просмотр исходного кода

* fixed missing offset assignment

git-svn-id: trunk@984 -
florian 20 лет назад
Родитель
Сommit
609f35b34c
1 измененных файлов с 1 добавлено и 0 удалено
  1. 1 0
      compiler/arm/cpupara.pas

+ 1 - 0
compiler/arm/cpupara.pas

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