Bläddra i källkod

* 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 -

nickysn 7 år sedan
förälder
incheckning
5b47bad32a
1 ändrade filer med 4 tillägg och 4 borttagningar
  1. 4 4
      compiler/systems/t_msdos.pas

+ 4 - 4
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;