[COMMITTED 31/35] ada: Mark XUB types as nameless

[Marc Poulhiès]

From: Tom Tromey <tro...@adacore.com>

gdb does not need the name of XUB types.  This patch changes the
compiler to omit these names from the DWARF when minimal encodings are
in use.

gcc/ada/ChangeLog:

        * gcc-interface/decl.cc (gnat_to_gnu_entity): Set TYPE_NAMELESS on
        XUB types.

Tested on x86_64-pc-linux-gnu, committed on master.

---
 gcc/ada/gcc-interface/decl.cc | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/gcc/ada/gcc-interface/decl.cc b/gcc/ada/gcc-interface/decl.cc
index 14b39b336bd..256541df411 100644
--- a/gcc/ada/gcc-interface/decl.cc
+++ b/gcc/ada/gcc-interface/decl.cc
@@ -2393,6 +2393,8 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, 
bool definition)
        /* Install all the fields into the template.  */
        TYPE_NAME (gnu_template_type)
          = create_concat_name (gnat_entity, "XUB");
+       TYPE_NAMELESS (gnu_template_type)
+         = gnat_encodings != DWARF_GNAT_ENCODINGS_ALL;
        gnu_template_fields = NULL_TREE;
        for (index = 0; index < ndim; index++)
          gnu_template_fields
-- 
2.43.0