Toolchain/binutils-gdb
1
0
Fork 0
forked from Imagelibrary/binutils-gdb
Code Pull Requests Activity

Allow for anonymous Ada enumeration types

Browse Source 
With some forthcoming changes to GNAT, gdb might see a nameless enum
in ada_resolve_enum, causing a crash.  This patch allows an anonymous
enum type to be considered identical to a named type when the contents
are identical.
This commit is contained in:
Tom Tromey
2024-09-09 10:57:56 -06:00
parent a584cfc980
commit 29faeceaa8
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/ada-lang.c
View File

@@ -3796,7 +3796,10 @@ ada_resolve_enum (std::vector<struct block_symbol> &syms,
for (int i = 0; i < syms.size (); ++i) for (int i = 0; i < syms.size (); ++i)
{ {
struct type *type2 = ada_check_typedef (syms[i].symbol->type ()); struct type *type2 = ada_check_typedef (syms[i].symbol->type ());
if (strcmp (type1->name (), type2->name ()) != 0) /* We let an anonymous enum type match a non-anonymous one. */
if (type1->name () != nullptr
&& type2->name () != nullptr
&& strcmp (type1->name (), type2->name ()) != 0)
continue; continue;
if (ada_identical_enum_types_p (type1, type2)) if (ada_identical_enum_types_p (type1, type2))
return i; return i;