소스 검색

Merged revisions 3005 via svnmerge from
svn+ssh://[email protected]/FPC/svn/fpc/branches/linker/compiler

r3005 (peter)
* fix stab relocation for local symbols

git-svn-id: trunk@3044 -

peter 19 년 전
부모
커밋
3e074126f4
1개의 변경된 파일3개의 추가작업 그리고 1개의 파일을 삭제
  1. 3 1
      compiler/assemble.pas

+ 3 - 1
compiler/assemble.pas

@@ -874,7 +874,9 @@ Implementation
                 ofs:=0;
                 relocsym:=nil;
               end;
-            if (nidx=N_Function) and
+            if assigned(relocsym) and
+               (relocsym.bind=AB_GLOBAL) and
+               (nidx=N_Function) and
                (tf_use_function_relative_addresses in target_info.flags) then
               ofs:=0;
             ObjData.writestab(ofs,relocsym,byte(nidx),byte(nother),word(nline),pstr);