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

* initialise result of GetDarwinPrtobjName() in case GetDarwinCrt1ObjName()
returns an empty string

git-svn-id: trunk@25328 -

Jonas Maebe пре 12 година
родитељ
комит
528f5d1096
1 измењених фајлова са 3 додато и 1 уклоњено
  1. 3 1
      compiler/systems/t_bsd.pas

+ 3 - 1
compiler/systems/t_bsd.pas

@@ -297,7 +297,9 @@ begin
   startupfile:=GetDarwinCrt1ObjName(isdll);
   if (startupfile<>'') and
      not librarysearchpath.FindFile(startupfile,false,result) then
-    result:='/usr/lib/'+startupfile;
+    result:='/usr/lib/'+startupfile
+  else
+    result:=startupfile;
   result:=maybequoted(result);
 end;