Browse Source

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

git-svn-id: trunk@25328 -

Jonas Maebe 12 years ago
parent
commit
528f5d1096
1 changed files with 3 additions and 1 deletions
  1. 3 1
      compiler/systems/t_bsd.pas

+ 3 - 1
compiler/systems/t_bsd.pas

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