utils.c (gnat_write_global_declarations): Use type_decl method instead of global_decl...

	* gcc-interface/utils.c (gnat_write_global_declarations): Use type_decl
	method instead of global_decl for TYPE_DECLs.

From-SVN: r222967

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 75211c672d5246bfa61344ddf0eeabd91d7cf65f..9b0e53d89da9aa84001d71eba0a349d257351bc6 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,8 @@
+2015-05-09  Eric Botcazou  <ebotcazou@adacore.com>
+
+       * gcc-interface/utils.c (gnat_write_global_declarations): Use type_decl
+       method instead of global_decl for TYPE_DECLs.
+
 2015-04-27  Jim Wilson  <jim.wilson@linaro.org>
 
        * gcc-interface/Makefile-lan.in (ada.mostlyclean): Remove gnatbind

diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c
index 170aa4a97167cdd3752643da3fd48f7d82a61e61..59688574dab4151ec38a30fad595fc6ccade6456 100644 (file)
--- a/gcc/ada/gcc-interface/utils.c
+++ b/gcc/ada/gcc-interface/utils.c
@@ -5211,7 +5211,7 @@ gnat_write_global_declarations (void)
      finalized in the right context.  */
   FOR_EACH_VEC_SAFE_ELT (global_decls, i, iter)
     if (TREE_CODE (iter) == TYPE_DECL && !DECL_IGNORED_P (iter))
-      debug_hooks->global_decl (iter);
+      debug_hooks->type_decl (iter, false);
 
   /* Proceed to optimize and emit assembly. */
   symtab->finalize_compilation_unit ();