* ada-typeprint.c (ada_typedef_print): Remove. Unused.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 47912f7..eb792c2 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,7 @@
+2009-02-19  Joel Brobecker  <brobecker@adacore.com>
+
+       * ada-typeprint.c (ada_typedef_print): Remove.  Unused.
+
 2009-02-18  Vladimir Prus  <vladimir@codesourcery.com>
 
        * mi/mi-interp.c (mi_solib_loaded, mi_solib_unloaded): New.

diff --git a/gdb/ada-typeprint.c b/gdb/ada-typeprint.c
index e1ab2ac..f00824a 100644 (file)
--- a/gdb/ada-typeprint.c
+++ b/gdb/ada-typeprint.c
@@ -114,22 +114,6 @@ decoded_type_name (struct type *type)
     }
 }
 
-
-/* Print a description of a type in the format of a
-   typedef for the current language.
-   NEW is the new name for a type TYPE.  */
-
-void
-ada_typedef_print (struct type *type, struct symbol *new,
-                  struct ui_file *stream)
-{
-   /* XXX: type_sprint */
-  fprintf_filtered (stream, "type %.*s is ",
-                   ada_name_prefix_len (SYMBOL_PRINT_NAME (new)),
-                   SYMBOL_PRINT_NAME (new));
-  type_print (type, "", stream, 1);
-}
-
 /* Print range type TYPE on STREAM.  */
 
 static void