ソースを参照

* fixup for r32534: don't define external symbols, only reference them
(mantis #29091)

git-svn-id: trunk@32535 -

Jonas Maebe 9 年 前
コミット
ac743195b6
1 ファイル変更7 行追加7 行削除
  1. 7 7
      compiler/aasmcnst.pas

+ 7 - 7
compiler/aasmcnst.pas

@@ -1342,16 +1342,16 @@ implementation
 
    class function ttai_typedconstbuilder.get_vectorized_dead_strip_section_symbol(const basename: string; st: tsymtable; define, start: boolean): tasmsymbol;
      var
-       bind: tasmsymbind;
+       name: TSymStr;
      begin
-       if define then
-         bind:=AB_GLOBAL
-       else
-         bind:=AB_EXTERNAL;
        if start then
-         result:=current_asmdata.DefineAsmSymbol(make_mangledname(basename,st,'START'),bind,AT_DATA)
+         name:=make_mangledname(basename,st,'START')
+       else
+         name:=make_mangledname(basename,st,'END');
+       if define then
+         result:=current_asmdata.DefineAsmSymbol(name,AB_GLOBAL,AT_DATA)
        else
-         result:=current_asmdata.DefineAsmSymbol(make_mangledname(basename,st,'END'),bind,AT_DATA);
+         result:=current_asmdata.RefAsmSymbol(name,AT_DATA)
      end;