Преглед на файлове

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.
     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
 
     See the file COPYING.FPC, included in this distribution,
@@ -327,7 +327,7 @@ begin
           end;
 {$endif}
 {$ifdef cpupowerpc}
-        inc(stab[j].nvalue,rela^.r_addend);
+        inc(stab[j].nvalue,rel^.r_addend);
 {$endif}
       end;
   until not GetNextReloc;