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

forgot if cs_debuginfo

Browse Source
This commit is contained in:
peter 2004-11-04 17:12:24 +00:00
parent f4a7c3d444
commit 79e754cb8c
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/ncgutil.pas
View File

@ -1796,7 +1796,8 @@ implementation
maybe_new_object_file(curconstSegment);
new_section(curconstSegment,sec_rodata,lower(sym.mangledname),const_align(l));
{$ifdef GDB}
sym.concatstabto(curconstSegment);
if (cs_debuginfo in aktmoduleswitches) then
sym.concatstabto(curconstSegment);
{$endif GDB}
if (sym.owner.symtabletype=globalsymtable) or
maybe_smartlink_symbol or
@ -1824,7 +1825,8 @@ implementation
maybe_new_object_file(bssSegment);
new_section(bssSegment,sec_bss,lower(sym.mangledname),varalign);
{$ifdef GDB}
sym.concatstabto(bssSegment);
if (cs_debuginfo in aktmoduleswitches) then
sym.concatstabto(bssSegment);
{$endif GDB}
if (sym.owner.symtabletype=globalsymtable) or
maybe_smartlink_symbol or
@ -2209,7 +2211,10 @@ implementation
end.
{
$Log$
Revision 1.235 2004-11-04 17:09:54 peter
Revision 1.236 2004-11-04 17:12:24 peter
forgot if cs_debuginfo
Revision 1.235 2004/11/04 17:09:54 peter
fixed debuginfo for variables in staticsymtable
Revision 1.234 2004/10/31 21:45:03 peter