소스 검색

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

git-svn-id: trunk@10351 -
daniel 17 년 전
부모
커밋
3540c400dc
1개의 변경된 파일4개의 추가작업 그리고 4개의 파일을 삭제
  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