paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-26 23:31:40 +01:00
Code Issues Packages Projects Releases Wiki Activity

* don't disable -Xs when -g and -Xg is used

Browse Source 
git-svn-id: trunk@6629 -
This commit is contained in:
peter 2007-02-24 15:12:44 +00:00
parent 9f3de7e809
commit 2ea4c683db
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/options.pas
View File

@ -2273,8 +2273,11 @@ begin
include(init_settings.globalswitches,cs_link_extern); include(init_settings.globalswitches,cs_link_extern);
{ turn off stripping if compiling with debuginfo or profile } { turn off stripping if compiling with debuginfo or profile }
if (cs_debuginfo in init_settings.moduleswitches) or if (
(cs_profile in init_settings.moduleswitches) then (cs_debuginfo in init_settings.moduleswitches) or
(cs_profile in init_settings.moduleswitches)
) and
not(cs_link_separate_dbg_file in init_settings.globalswitches) then
exclude(init_settings.globalswitches,cs_link_strip); exclude(init_settings.globalswitches,cs_link_strip);
{ force fpu emulation on arm/wince, arm/gba and arm/nds} { force fpu emulation on arm/wince, arm/gba and arm/nds}