paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-11 10:29:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

* link reordering

Browse Source 
git-svn-id: trunk@4016 -
This commit is contained in:
marco 2006-06-30 20:14:01 +00:00
parent f10da047d8
commit 2aadf05093
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
compiler/systems/t_bsd.pas
View File

@ -315,7 +315,12 @@ Begin
if (cs_link_pthread in aktglobalswitches) Then // convert libpthread to libc_r.
LinkLibraryAliases.add('pthread','c_r');
end;
end;
end
else
begin
LinkLibraryOrder.add('gcc','',15);
LinkLibraryOrder.add('c','',50);
end;
End;
Function TLinkerBSD.WriteResponseFile(isdll:boolean) : Boolean;
@ -366,14 +371,13 @@ begin
if linklibc then
prtobj:=cprtobj;
end;
if reorder Then
ExpandAndApplyOrder(SharedLibFiles);
// after this point addition of shared libs not allowed.
end
else
begin
{ for darwin: always link dynamically against libc }
linklibc := true;
reorder:=reorderentries;
if not(isdll) then
if not(cs_profile in aktmoduleswitches) then
begin
@ -388,6 +392,8 @@ begin
prtobj:='';
end;
if reorder Then
ExpandAndApplyOrder(SharedLibFiles);
{ Open link.res file }
LinkRes:=TLinkRes.Create(outputexedir+Info.ResName);