2003-10-06 Andrew Cagney <cagney@redhat.com>

[deliverable/binutils-gdb.git] / gdb / ada-typeprint.c

diff --git a/gdb/ada-typeprint.c b/gdb/ada-typeprint.c
index 1aeb2c0f3b8df324b6c694ba3fbd74c291c9ffc8..19393541d5c05ee4f9eeb574c24d39e4a7537e70 100644 (file)
--- a/gdb/ada-typeprint.c
+++ b/gdb/ada-typeprint.c
@@ -1,5 +1,6 @@
 /* Support for printing Ada types for GDB, the GNU debugger.
-   Copyright 1986, 1988, 1989, 1991, 1997 Free Software Foundation, Inc.
+   Copyright 1986, 1988, 1989, 1991, 1997, 2003 Free Software
+   Foundation, Inc.
 
 This file is part of GDB.
 
@@ -35,7 +36,7 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
 #include "ada-lang.h"
 
 #include <ctype.h>
-#include <string.h>
+#include "gdb_string.h"
 #include <errno.h>
 
 static int print_record_field_types (struct type *, struct type *,
@@ -124,8 +125,8 @@ ada_typedef_print (struct type *type, struct symbol *new,
                   struct ui_file *stream)
 {
   fprintf_filtered (stream, "type %.*s is ",
-                   ada_name_prefix_len (SYMBOL_SOURCE_NAME (new)),
-                   SYMBOL_SOURCE_NAME (new));
+                   ada_name_prefix_len (SYMBOL_PRINT_NAME (new)),
+                   SYMBOL_PRINT_NAME (new));
   type_print (type, "", stream, 1);
 }