diff options
-rw-r--r-- | gdb/ChangeLog | 4 | ||||
-rw-r--r-- | gdb/dwarf2read.c | 5 |
2 files changed, 9 insertions, 0 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index abf609c..4d62be7 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,7 @@ +2008-01-08 Joel Brobecker <brobecker@adacore.com> + + * dwarf2read.c (read_enumeration_type): Add comment. + 2008-01-08 Thiago Jung Bauermann <bauerman@br.ibm.com> * config.in: Regenerate. diff --git a/gdb/dwarf2read.c b/gdb/dwarf2read.c index f9dfff1..2cb65c7 100644 --- a/gdb/dwarf2read.c +++ b/gdb/dwarf2read.c @@ -4233,6 +4233,11 @@ read_enumeration_type (struct die_info *die, struct dwarf2_cu *cu) TYPE_LENGTH (type) = 0; } + /* The enumeration DIE can be incomplete. In Ada, any type can be + declared as private in the package spec, and then defined only + inside the package body. Such types are known as Taft Amendment + Types. When another package uses such a type, an incomplete DIE + may be generated by the compiler. */ if (die_is_declaration (die, cu)) TYPE_FLAGS (type) |= TYPE_FLAG_STUB; |