Browse Source

* emit alignment directive in the typed constant builder when starting a new
constant without putting it in a separate section

git-svn-id: branches/hlcgllvm@28755 -

Jonas Maebe 10 years ago
parent
commit
6560b1dbd6
1 changed files with 3 additions and 1 deletions
  1. 3 1
      compiler/aasmcnst.pas

+ 3 - 1
compiler/aasmcnst.pas

@@ -433,7 +433,9 @@ implementation
          begin
          begin
            maybe_new_object_file(prelist);
            maybe_new_object_file(prelist);
            new_section(prelist,section,secname,const_align(alignment));
            new_section(prelist,section,secname,const_align(alignment));
-         end;
+         end
+       else
+         prelist.concat(cai_align.Create(const_align(alignment)));
        if not(tcalo_is_lab in options) then
        if not(tcalo_is_lab in options) then
          if sym.bind=AB_GLOBAL then
          if sym.bind=AB_GLOBAL then
            prelist.concat(tai_symbol.Create_Global(sym,0))
            prelist.concat(tai_symbol.Create_Global(sym,0))