瀏覽代碼

* code symbols start with a dot on AIX just like on linux/ppc64

git-svn-id: trunk@20813 -
Jonas Maebe 13 年之前
父節點
當前提交
909f99b4c7
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/optdead.pas

+ 1 - 1
compiler/optdead.pas

@@ -305,7 +305,7 @@ const
         { on Linux/ppc64, there is an extra '.' at the start
         { on Linux/ppc64, there is an extra '.' at the start
           of public function names
           of public function names
         }
         }
-        if (target_info.system=system_powerpc64_linux) then
+        if (target_info.system in ([system_powerpc64_linux]+systems_aix)) then
           inc(fsymnamepos);
           inc(fsymnamepos);
         if failiferror(fsymtypepos<=0) then
         if failiferror(fsymtypepos<=0) then
           exit;
           exit;