Selaa lähdekoodia

* Fix read/write enum on cpu's requiring alignment: Call 'align' the proper way.

git-svn-id: trunk@10351 -
daniel 17 vuotta sitten
vanhempi
commit
3540c400dc
1 muutettua tiedostoa jossa 4 lisäystä ja 4 poistoa
  1. 4 4
      compiler/ncgrtti.pas

+ 4 - 4
compiler/ncgrtti.pas

@@ -936,10 +936,10 @@ implementation
           else
             inc(st);
           if (tf_requires_proper_alignment in target_info.flags) then
-            align(st,sizeof(Tconstptruint));
+            st:=align(st,sizeof(Tconstptruint));
           inc(st);
           if (tf_requires_proper_alignment in target_info.flags) then
-            align(st,sizeof(Tconstptruint));
+            st:=align(st,sizeof(Tconstptruint));
           inc(st,8+sizeof(pint));
           { write rtti data }
           with current_asmdata do
@@ -1042,10 +1042,10 @@ implementation
           else
             inc(st);
           if (tf_requires_proper_alignment in target_info.flags) then
-            align(st,sizeof(Tconstptruint));
+            st:=align(st,sizeof(Tconstptruint));
           inc(st);
           if (tf_requires_proper_alignment in target_info.flags) then
-            align(st,sizeof(Tconstptruint));
+            st:=align(st,sizeof(Tconstptruint));
           inc(st,8+sizeof(pint));
           { write rtti data }
           with current_asmdata do