[PATCH 2/2] Ada: add XVE/XVU parallel types to lexical scopes

[Pierre-Marie de Rodat]

Hello,

This change adds TYPE_DECL nodes for XVE/XVU parallel types to lexical
scopes so that these types are properly scoped in the debug information.
Ok to commit? Thank you in advance!

gcc/ada/ChangeLog:

        * gcc-interface/utils.c (rest_of_record_type_compilation): Add
        XVE/XVU parallel types to the current lexical scope.
---
 gcc/ada/gcc-interface/utils.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c
index 779c376..0226c28 100644
--- a/gcc/ada/gcc-interface/utils.c
+++ b/gcc/ada/gcc-interface/utils.c
@@ -1937,6 +1937,7 @@ rest_of_record_type_compilation (tree record_type)
        = create_type_stub_decl (new_name, new_record_type);
       DECL_IGNORED_P (TYPE_STUB_DECL (new_record_type))
        = DECL_IGNORED_P (TYPE_STUB_DECL (record_type));
+      gnat_pushdecl (TYPE_STUB_DECL (new_record_type), Empty);
       TYPE_SIZE (new_record_type) = size_int (TYPE_ALIGN (record_type));
       TYPE_SIZE_UNIT (new_record_type)
        = size_int (TYPE_ALIGN (record_type) / BITS_PER_UNIT);
--
2.6.4