Преглед на файлове

* add df_dwarf_dbg_info

git-svn-id: trunk@5048 -
peter преди 19 години
родител
ревизия
6ff28f639d
променени са 1 файла, в които са добавени 4 реда и са изтрити 1 реда
  1. 4 1
      compiler/utils/ppudump.pp

+ 4 - 1
compiler/utils/ppudump.pp

@@ -777,6 +777,8 @@ type
     df_has_inittable,
     df_has_inittable,
     { rtti data has been generated }
     { rtti data has been generated }
     df_has_rttitable,
     df_has_rttitable,
+    { dwarf debug info has been generated }
+    df_has_dwarf_dbg_info,
     { type is unique, i.e. declared with type = type <tdef>; }
     { type is unique, i.e. declared with type = type <tdef>; }
     df_unique,
     df_unique,
     { type is a generic }
     { type is a generic }
@@ -790,10 +792,11 @@ type
     str  : string[30];
     str  : string[30];
   end;
   end;
 const
 const
-  defopts=5;
+  defopts=6;
   defopt : array[1..defopts] of tdefopt=(
   defopt : array[1..defopts] of tdefopt=(
      (mask:df_has_inittable;  str:'InitTable'),
      (mask:df_has_inittable;  str:'InitTable'),
      (mask:df_has_rttitable;  str:'RTTITable'),
      (mask:df_has_rttitable;  str:'RTTITable'),
+     (mask:df_has_dwarf_dbg_info;  str:'Dwarf DbgInfo'),
      (mask:df_unique;         str:'Unique Type'),
      (mask:df_unique;         str:'Unique Type'),
      (mask:df_generic;        str:'Generic'),
      (mask:df_generic;        str:'Generic'),
      (mask:df_specialization; str:'Specialization')
      (mask:df_specialization; str:'Specialization')