paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-13 23:59:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

* cross-darwin support

Browse Source 
git-svn-id: trunk@1796 -
This commit is contained in:
marco 2005-11-20 22:13:23 +00:00
parent 10e40626cb
commit d2e7a4e587
1 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
compiler/systems/t_bsd.pas
View File

@ -364,7 +364,12 @@ begin
linklibc := true; linklibc := true;
if not(isdll) then if not(isdll) then
if not(cs_profile in aktmoduleswitches) then if not(cs_profile in aktmoduleswitches) then
prtobj:='/usr/lib/crt1.o' begin
if librarysearchpath.FindFile('crt1.o',s) then
prtobj:=s
else
prtobj:='/usr/lib/crt1.o';
end
else else
prtobj:='/usr/lib/gcrt1.o' prtobj:='/usr/lib/gcrt1.o'
else else
@ -544,7 +549,12 @@ begin
DynLinkStr:='-dynamic-linker='+Info.DynamicLinker; DynLinkStr:='-dynamic-linker='+Info.DynamicLinker;
if CShared Then if CShared Then
DynLinKStr:=DynLinkStr+' --shared'; begin
if (target_info.system <> system_powerpc_darwin) then
DynLinKStr:=DynLinkStr+' --shared'
else
DynLinKStr:=DynLinkStr+' -dynamic'; // one dash!
end;
{ Write used files and libraries } { Write used files and libraries }
WriteResponseFile(false); WriteResponseFile(false);