2
0
Эх сурвалжийг харах

* agppcmpw.getopstr: always access RTOC symbols as [TC](RTOC) instead of only (RTOC)

git-svn-id: trunk@36885 -
svenbarth 8 жил өмнө
parent
commit
3fd68bf59c

+ 1 - 3
compiler/powerpc/agppcmpw.pas

@@ -275,9 +275,7 @@ interface
                 internalerror(2011122701);
               hs:=o.ref^.symbol.name;
               ReplaceForbiddenChars(hs);
-              if o.ref^.symbol.bind=AB_EXTERNAL then
-                hs:=hs+'[TC]';
-              hs:=hs+'(RTOC)';
+              hs:=hs+'[TC](RTOC)';
               getopstr:=hs;
             end
           else