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 years ago
parent
commit
74ab27ae47
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/cutils.pas

+ 1 - 1
compiler/cutils.pas

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