瀏覽代碼

* fix typecast

git-svn-id: trunk@3376 -
peter 19 年之前
父節點
當前提交
c861491323
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      compiler/x86/agx86int.pas

+ 2 - 2
compiler/x86/agx86int.pas

@@ -507,8 +507,8 @@ implementation
                { CAUSES PROBLEMS WITH THE SEGMENT DEFINITION   }
                { SEGMENT DEFINITION SHOULD MATCH TYPE OF ALIGN }
                { HERE UNDER TASM!                              }
-                 if tai_align(hp).aligntype>1 then
-                   AsmWriteLn(#9'ALIGN '+tostr(tai_align(hp).aligntype));
+                 if tai_align_abstract(hp).aligntype>1 then
+                   AsmWriteLn(#9'ALIGN '+tostr(tai_align_abstract(hp).aligntype));
                end;
            ait_datablock :
              begin