Преглед изворни кода

* fixed position of "weak" linkage flag

git-svn-id: trunk@32915 -
Jonas Maebe пре 9 година
родитељ
комит
e3f8f8c974
1 измењених фајлова са 4 додато и 2 уклоњено
  1. 4 2
      compiler/llvm/agllvm.pas

+ 4 - 2
compiler/llvm/agllvm.pas

@@ -977,6 +977,8 @@ implementation
                   else
                     begin
                       writer.AsmWrite('define');
+                      if ldf_weak in taillvmdecl(hp).flags then
+                        writer.AsmWrite(' weak');
                       WriteLinkageVibilityFlags(taillvmdecl(hp).namesym.bind);
                       writer.AsmWrite(llvmencodeproctype(tprocdef(taillvmdecl(hp).def), '', lpd_def));
                       WriteFunctionFlags(tprocdef(taillvmdecl(hp).def));
@@ -987,10 +989,10 @@ implementation
                 begin
                   writer.AsmWrite(LlvmAsmSymName(taillvmdecl(hp).namesym));
                   writer.AsmWrite(' =');
+                  if ldf_weak in taillvmdecl(hp).flags then
+                    writer.AsmWrite(' weak');
                   WriteLinkageVibilityFlags(taillvmdecl(hp).namesym.bind);
                   writer.AsmWrite(' ');
-                  if ldf_weak in taillvmdecl(hp).flags then
-                    writer.AsmWrite('weak ');
                   if (ldf_tls in taillvmdecl(hp).flags) then
                     writer.AsmWrite('thread_local ');
                   if ldf_unnamed_addr in taillvmdecl(hp).flags then