paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-03 20:50:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

* only pass --gc-sections to the linker if smart linking is enabled

Browse Source 
(mantis #24396)

git-svn-id: trunk@24465 -
This commit is contained in:
Jonas Maebe 2013-05-07 20:28:54 +00:00
parent 5a4a3cbbc3
commit b16677a75b
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/systems/t_linux.pas
View File

@ -1062,7 +1062,8 @@ begin
StripStr:='-s'; StripStr:='-s';
if (cs_link_map in current_settings.globalswitches) then if (cs_link_map in current_settings.globalswitches) then
StripStr:='-Map '+maybequoted(ChangeFileExt(current_module.exefilename,'.map')); StripStr:='-Map '+maybequoted(ChangeFileExt(current_module.exefilename,'.map'));
if create_smartlink_sections then if (cs_link_smart in current_settings.globalswitches) and
create_smartlink_sections then
GCSectionsStr:='--gc-sections'; GCSectionsStr:='--gc-sections';
If (cs_profile in current_settings.moduleswitches) or If (cs_profile in current_settings.moduleswitches) or
((Info.DynamicLinker<>'') and (not SharedLibFiles.Empty)) then ((Info.DynamicLinker<>'') and (not SharedLibFiles.Empty)) then