re PR ada/65319 (FAIL: g++.dg/other/dump-ada-spec-3.C -std=gnu++98 (internal compile...

	PR ada/65319
	* c-ada-spec.c (print_destructor): Remove obsolete code.

From-SVN: r221213

diff --git a/gcc/c-family/ChangeLog b/gcc/c-family/ChangeLog
index e1d4eff7bdca1638bbc5d66da66db78b12fb4d1b..07fe10bf139c7a32912393061238f768bfb7575f 100644 (file)
--- a/gcc/c-family/ChangeLog
+++ b/gcc/c-family/ChangeLog
@@ -1,3 +1,8 @@
+2015-03-05  Eric Botcazou  <ebotcazou@adacore.com>
+
+       PR ada/65319
+       * c-ada-spec.c (print_destructor): Remove obsolete code.
+
 2015-03-01  Eric Botcazou  <ebotcazou@adacore.com>
 
        * c-ada-spec.c (is_tagged_type): Add guard for DECL_VINDEX.

diff --git a/gcc/c-family/c-ada-spec.c b/gcc/c-family/c-ada-spec.c
index fcfefb03f79c8a3ed44f2d80e050a9b8f3fd5a4e..2dce3cf0cb8ad76662e2bd1ea22c78dcca5ad1bf 100644 (file)
--- a/gcc/c-family/c-ada-spec.c
+++ b/gcc/c-family/c-ada-spec.c
@@ -2541,18 +2541,9 @@ static void
 print_destructor (pretty_printer *buffer, tree t)
 {
   tree decl_name = DECL_NAME (DECL_ORIGIN (t));
-  const char *s = IDENTIFIER_POINTER (decl_name);
 
-  if (*s == '_')
-    {
-      for (s += 2; *s != ' '; s++)
-       pp_character (buffer, *s);
-    }
-  else
-    {
-      pp_string (buffer, "Delete_");
-      pp_ada_tree_identifier (buffer, decl_name, t, false);
-    }
+  pp_string (buffer, "Delete_");
+  pp_ada_tree_identifier (buffer, decl_name, t, false);
 }
 
 /* Return the name of type T.  */