From 5b47bad32ae2af34488a7fffdd93e69d83333094 Mon Sep 17 00:00:00 2001 From: nickysn Date: Thu, 14 Jun 2018 15:19:11 +0000 Subject: [PATCH] * use uppercase object section names in the OMF linker script for matching the dwarf debug sections. This is because they are converted to upper case when reading (so that we treat omf section names as case-insensitive) git-svn-id: trunk@39220 - --- compiler/systems/t_msdos.pas | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/compiler/systems/t_msdos.pas b/compiler/systems/t_msdos.pas index 63bb18affa..2da8c06afe 100644 --- a/compiler/systems/t_msdos.pas +++ b/compiler/systems/t_msdos.pas @@ -497,16 +497,16 @@ begin (target_dbg.id in [dbg_dwarf2,dbg_dwarf3,dbg_dwarf4]) then begin LinkScript.Concat('EXESECTION .debug_info'); - LinkScript.Concat(' OBJSECTION .debug_info||DWARF'); + LinkScript.Concat(' OBJSECTION .DEBUG_INFO||DWARF'); LinkScript.Concat('ENDEXESECTION'); LinkScript.Concat('EXESECTION .debug_abbrev'); - LinkScript.Concat(' OBJSECTION .debug_abbrev||DWARF'); + LinkScript.Concat(' OBJSECTION .DEBUG_ABBREV||DWARF'); LinkScript.Concat('ENDEXESECTION'); LinkScript.Concat('EXESECTION .debug_line'); - LinkScript.Concat(' OBJSECTION .debug_line||DWARF'); + LinkScript.Concat(' OBJSECTION .DEBUG_LINE||DWARF'); LinkScript.Concat('ENDEXESECTION'); LinkScript.Concat('EXESECTION .debug_aranges'); - LinkScript.Concat(' OBJSECTION .debug_aranges||DWARF'); + LinkScript.Concat(' OBJSECTION .DEBUG_ARANGES||DWARF'); LinkScript.Concat('ENDEXESECTION'); end;