Sfoglia il codice sorgente

* set the properties of the dwarf debug info sections in the omf obj writer
as required by wlink in order to be recognized and handled as debug info
(i.e. class=DWARF, use32)

git-svn-id: trunk@30636 -

nickysn 10 anni fa
parent
commit
7fca6dd6c1
1 ha cambiato i file con 9 aggiunte e 0 eliminazioni
  1. 9 0
      compiler/ogomf.pas

+ 9 - 0
compiler/ogomf.pas

@@ -277,6 +277,15 @@ implementation
             FClassName:='data';
             FClassName:='data';
             dgroup:=true;
             dgroup:=true;
           end
           end
+        else if (Aname='debug_frame') or
+                (Aname='debug_info') or
+                (Aname='debug_line') or
+                (Aname='debug_abbrev') then
+          begin
+            FClassName:='DWARF';
+            FUse:=suUse32;
+            dgroup:=false;
+          end
         else
         else
           begin
           begin
             FClassName:='data';
             FClassName:='data';