Browse Source

cutils: also use minalign, when varalign equals it, not only when varalign is less than it (21 years old bug?)

Karoly Balogh 3 năm trước cách đây
mục cha
commit
74ab27ae47
1 tập tin đã thay đổi với 1 bổ sung1 xóa
  1. 1 1
      compiler/cutils.pas

+ 1 - 1
compiler/cutils.pas

@@ -467,7 +467,7 @@ implementation
           minalign  : Minimum alignment of this structure, 0 = undefined
           maxalign  : Maximum alignment of this structure, 0 = undefined }
         if (minalign>0) and
-           (varalign<minalign) then
+           (varalign<=minalign) then
          used_align:=minalign
         else
          begin