Bladeren bron

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

Karoly Balogh 3 jaren geleden
bovenliggende
commit
74ab27ae47
1 gewijzigde bestanden met toevoegingen van 1 en 1 verwijderingen
  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