Pārlūkot izejas kodu

* fixed -OWsymbolliveness for linux/ppc64 (exported function symbol names
start with a '.' there)

git-svn-id: trunk@12347 -

Jonas Maebe 16 gadi atpakaļ
vecāks
revīzija
dae90242e4
1 mainītis faili ar 5 papildinājumiem un 0 dzēšanām
  1. 5 0
      compiler/optdead.pas

+ 5 - 0
compiler/optdead.pas

@@ -302,6 +302,11 @@ const
         result:=false;
         fsymtypepos:=pos(' ',line)+1;
         fsymnamepos:=fsymtypepos+2;
+        { on Linux/ppc64, there is an extra '.' at the start
+          of public function names
+        }
+        if (target_info.system=system_powerpc64_linux) then
+          inc(fsymnamepos);
         if failiferror(fsymtypepos<=0) then
           exit;
         { make sure there's room for the name }