瀏覽代碼

amicommon/lineinfo: fixed copy-paste error in PowerPC codepath

git-svn-id: trunk@41094 -
Károly Balogh 6 年之前
父節點
當前提交
6d279fdbb9
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      rtl/amicommon/lineinfo.pp

+ 2 - 2
rtl/amicommon/lineinfo.pp

@@ -2,7 +2,7 @@
     This file is part of the Free Pascal run time library.
     This file is part of the Free Pascal run time library.
     Copyright (c) 2019 by the Free Pascal development team
     Copyright (c) 2019 by the Free Pascal development team
 
 
-    Stabs Line Info Retriever, MorphOS version
+    Stabs Line Info Retriever, Amiga-NG version
     can parse relocatable ELF executables
     can parse relocatable ELF executables
 
 
     See the file COPYING.FPC, included in this distribution,
     See the file COPYING.FPC, included in this distribution,
@@ -327,7 +327,7 @@ begin
           end;
           end;
 {$endif}
 {$endif}
 {$ifdef cpupowerpc}
 {$ifdef cpupowerpc}
-        inc(stab[j].nvalue,rela^.r_addend);
+        inc(stab[j].nvalue,rel^.r_addend);
 {$endif}
 {$endif}
       end;
       end;
   until not GetNextReloc;
   until not GetNextReloc;