Преглед изворни кода

+ also look for 'gnm' (necessary for e.g. solaris)

git-svn-id: trunk@12348 -
Jonas Maebe пре 17 година
родитељ
комит
dcf7412ea4
1 измењених фајлова са 3 додато и 0 уклоњено
  1. 3 0
      compiler/optdead.pas

+ 3 - 0
compiler/optdead.pas

@@ -351,6 +351,9 @@ const
     begin { twpodeadcodeinfofromexternallinker }
       { try nm }
       symbolprogfound:=findutil('nm',nmfullname,symbolprogfullpath);
+      { gnu-nm (e.g., on solaris) }
+      if not symbolprogfound then
+        symbolprogfound:=findutil('gnm',nmfullname,symbolprogfullpath);
       if not symbolprogfound then
         begin
           { try objdump }