2004-02-17 Ulrich Weigand <Ulrich.Weigand@de.ibm.com>

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

diff --git a/gdb/ada-typeprint.c b/gdb/ada-typeprint.c
index c18aa85b3974b0a53e342d44fc09534084926f6f..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.
 
@@ -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);
 }