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

* fixed bug in thlcgobj.g_array_rtti_helper introduced in the previous commit

git-svn-id: branches/i8086@24284 -
nickysn 12 лет назад
Родитель
Сommit
57777945a8
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      compiler/hlcgobj.pas

+ 1 - 1
compiler/hlcgobj.pas

@@ -3060,6 +3060,7 @@ implementation
       paramanager.getintparaloc(pd,2,cgpara2);
       paramanager.getintparaloc(pd,2,cgpara2);
       paramanager.getintparaloc(pd,3,cgpara3);
       paramanager.getintparaloc(pd,3,cgpara3);
 
 
+      reference_reset_symbol(href,RTTIWriter.get_rtti_label(t,initrtti),0,sizeof(pint));
       { if calling convention is left to right, push parameters 1 and 2 }
       { if calling convention is left to right, push parameters 1 and 2 }
       if pd.is_pushleftright then
       if pd.is_pushleftright then
         begin
         begin
@@ -3068,7 +3069,6 @@ implementation
         end;
         end;
 
 
       { push parameter 3 }
       { push parameter 3 }
-      reference_reset_symbol(href,RTTIWriter.get_rtti_label(t,initrtti),0,sizeof(pint));
       if highloc.loc=LOC_CONSTANT then
       if highloc.loc=LOC_CONSTANT then
         a_load_const_cgpara(list,ptrsinttype,highloc.value+1,cgpara3)
         a_load_const_cgpara(list,ptrsinttype,highloc.value+1,cgpara3)
       else
       else