Bladeren bron

* don't write an alignment for symbols in internal llvm sections (sections
whose name starts with 'llvm.')

git-svn-id: trunk@35038 -

Jonas Maebe 8 jaren geleden
bovenliggende
commit
d328d7d95d
1 gewijzigde bestanden met toevoegingen van 10 en 3 verwijderingen
  1. 10 3
      compiler/llvm/agllvm.pas

+ 10 - 3
compiler/llvm/agllvm.pas

@@ -1240,9 +1240,16 @@ implementation
                         writer.AsmWrite('"');
                       end;
                   end;
-                  { alignment }
-                  writer.AsmWrite(', align ');
-                  writer.AsmWriteln(tostr(taillvmdecl(hp).alignment));
+                  { sections whose name starts with 'llvm.' are for LLVM
+                    internal use and don't have an alignment }
+                  if pos('llvm.',taillvmdecl(hp).secname)<>1 then
+                    begin
+                      { alignment }
+                      writer.AsmWrite(', align ');
+                      writer.AsmWriteln(tostr(taillvmdecl(hp).alignment));
+                    end
+                  else
+                    writer.AsmLn;
                 end;
             end;
           ait_llvmalias: