aboutsummaryrefslogtreecommitdiffstats
path: root/debug/DwarfTypes.mli
diff options
context:
space:
mode:
Diffstat (limited to 'debug/DwarfTypes.mli')
-rw-r--r--debug/DwarfTypes.mli15
1 files changed, 11 insertions, 4 deletions
diff --git a/debug/DwarfTypes.mli b/debug/DwarfTypes.mli
index 6c0af52b..ed75b3d7 100644
--- a/debug/DwarfTypes.mli
+++ b/debug/DwarfTypes.mli
@@ -60,8 +60,10 @@ type bound_value =
(* Types representing the attribute information per tag value *)
-type file_loc = int * constant
-
+type file_loc =
+ | Diab_file_loc of int * constant
+ | Gnu_file_loc of int * constant
+
type dw_tag_array_type =
{
array_type_file_loc: file_loc option;
@@ -80,7 +82,6 @@ type dw_tag_compile_unit =
compile_unit_name: string;
compile_unit_low_pc: int;
compile_unit_high_pc: int;
- compile_unit_stmt_list: int;
}
type dw_tag_const_type =
@@ -248,7 +249,13 @@ type location_entry =
}
type dw_locations = int * location_entry list
-type debug_entries = (string * int * dw_entry * dw_locations) list
+type diab_entries = (string * int * int * dw_entry * dw_locations) list
+
+type gnu_entries = dw_entry * dw_locations
+
+type debug_entries =
+ | Diab of diab_entries
+ | Gnu of gnu_entries
(* The target specific functions for printing the debug information *)
module type DWARF_TARGET=