Procházet zdrojové kódy

* add alignment padding to internally constructed llvm records

git-svn-id: trunk@31290 -
Jonas Maebe před 10 roky
rodič
revize
a722b5dbc5
1 změnil soubory, kde provedl 1 přidání a 0 odebrání
  1. 1 0
      compiler/llvm/llvmdef.pas

+ 1 - 0
compiler/llvm/llvmdef.pas

@@ -746,6 +746,7 @@ implementation
               recordalignmin,maxcrecordalign);
               recordalignmin,maxcrecordalign);
             trecorddef(res^.Data).add_fields_from_deflist(fieldtypes);
             trecorddef(res^.Data).add_fields_from_deflist(fieldtypes);
           end;
           end;
+        trecordsymtable(trecorddef(res^.Data).symtable).addalignmentpadding;
         result:=trecorddef(res^.Data);
         result:=trecorddef(res^.Data);
       end;
       end;