aboutsummaryrefslogtreecommitdiffstats
path: root/debug/Dwarfgen.ml
diff options
context:
space:
mode:
Diffstat (limited to 'debug/Dwarfgen.ml')
-rw-r--r--debug/Dwarfgen.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/debug/Dwarfgen.ml b/debug/Dwarfgen.ml
index 30e44e52..ee568042 100644
--- a/debug/Dwarfgen.ml
+++ b/debug/Dwarfgen.ml
@@ -232,7 +232,7 @@ module Dwarfgenaux (Target: TARGET) =
| None -> None
| Some s -> Some (DataLocBlock (DW_OP_plus_uconst s)));
member_declaration = None;
- member_name = string_entry mem.cfd_name;
+ member_name = if mem.cfd_anon then None else Some (string_entry mem.cfd_name);
member_type = mem.cfd_typ;
} in
new_entry (next_id ()) (DW_TAG_member mem)