dwarf2out.c (add_gnat_descriptive_type_attribute): Temporarily suppress debug…

dwarf2out.c (add_gnat_descriptive_type_attribute): Temporarily suppress debug info for the parent type.

	* dwarf2out.c (add_gnat_descriptive_type_attribute): Temporarily
	suppress debug info for the parent type.

From-SVN: r180456

gcc/ChangeLog

 2011-10-25  Eric Botcazou  <ebotcazou@adacore.com>
 
+	* dwarf2out.c (add_gnat_descriptive_type_attribute): Temporarily
+	suppress debug info for the parent type.
+
+2011-10-25  Eric Botcazou  <ebotcazou@adacore.com>
+
 	* config/ia64/ia64.c (ia64_profile_hook): Fix thinko.
 
 2011-10-25  Richard Henderson  <rth@redhat.com>

gcc/dwarf2out.c

@@ -15415,7 +15415,11 @@ add_gnat_descriptive_type_attribute (dw_die_ref die, tree type,
   dtype_die = lookup_type_die (dtype);
   if (!dtype_die)
     {
+      /* The descriptive type indirectly references TYPE if this is also the
+	 case for TYPE itself.  Do not deal with the circularity here.  */
+      TYPE_DECL_SUPPRESS_DEBUG (TYPE_STUB_DECL (type)) = 1;
       gen_type_die (dtype, context_die);
+      TYPE_DECL_SUPPRESS_DEBUG (TYPE_STUB_DECL (type)) = 0;
       dtype_die = lookup_type_die (dtype);
       gcc_assert (dtype_die);
     }