瀏覽代碼

* fixed alignment of widestring on win64 after llvm branch merge (should use
packrecords 4) (mantis #27806)

git-svn-id: trunk@30501 -

Jonas Maebe 10 年之前
父節點
當前提交
a8db5e3dfb
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/aasmcnst.pas

+ 1 - 1
compiler/aasmcnst.pas

@@ -1174,7 +1174,7 @@ implementation
          begin
            result.lab:=startlab;
            datatcb.begin_anonymous_record('$'+get_dynstring_rec_name(st_widestring,true,strlength),
-             0,
+             4,
              targetinfos[target_info.system]^.alignment.recordalignmin,
              targetinfos[target_info.system]^.alignment.maxCrecordalign);
            datatcb.emit_tai(Tai_const.Create_32bit(strlength*cwidechartype.size),s32inttype);