From 1f0e2688af26e66efa9db498d6db01760832fee3 Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Sat, 9 May 2015 11:31:21 +0000 Subject: [PATCH] utils.c (gnat_write_global_declarations): Use type_decl method instead of global_decl for TYPE_DECLs. * gcc-interface/utils.c (gnat_write_global_declarations): Use type_decl method instead of global_decl for TYPE_DECLs. From-SVN: r222967 --- gcc/ada/ChangeLog | 5 +++++ gcc/ada/gcc-interface/utils.c | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 75211c672d5..9b0e53d89da 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2015-05-09 Eric Botcazou + + * gcc-interface/utils.c (gnat_write_global_declarations): Use type_decl + method instead of global_decl for TYPE_DECLs. + 2015-04-27 Jim Wilson * 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 170aa4a9716..59688574dab 100644 --- 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 (); -- 2.30.2