diff options
-rw-r--r-- | gdb/ChangeLog | 5 | ||||
-rw-r--r-- | gdb/p-lang.h | 9 | ||||
-rw-r--r-- | gdb/p-valprint.c | 8 |
3 files changed, 15 insertions, 7 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 8681d94..8c64b53 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,10 @@ 2005-01-28 Andrew Cagney <cagney@gnu.org> + * p-lang.h (pascal_object_print_class_member) + (pascal_object_print_class_method): Make buffer a const bfd_byte. + * p-valprint.c (pascal_object_print_class_method) + (pascal_object_print_class_method): Ditto. + * language.h (struct language_defn): Make la_printstr's buffer parameter a const bfd_byte. * p-lang.h (pascal_printstr): Update function to match. diff --git a/gdb/p-lang.h b/gdb/p-lang.h index 0f1ef81..fff4666 100644 --- a/gdb/p-lang.h +++ b/gdb/p-lang.h @@ -1,5 +1,6 @@ /* Pascal language support definitions for GDB, the GNU debugger. - Copyright 2000 Free Software Foundation, Inc. + + Copyright 2000, 2005 Free Software Foundation, Inc. This file is part of GDB. @@ -64,9 +65,11 @@ extern int vtblprint; /* Controls printing of vtbl's */ extern int static_field_print; -extern void pascal_object_print_class_member (char *, struct type *, struct ui_file *, char *); +extern void pascal_object_print_class_member (const bfd_byte *, struct type *, + struct ui_file *, char *); -extern void pascal_object_print_class_method (char *, struct type *, struct ui_file *); +extern void pascal_object_print_class_method (const bfd_byte *, struct type *, + struct ui_file *); extern void pascal_object_print_value_fields (struct type *, char *, CORE_ADDR, struct ui_file *, int, int, enum val_prettyprint, diff --git a/gdb/p-valprint.c b/gdb/p-valprint.c index e320c19..21d21104 100644 --- a/gdb/p-valprint.c +++ b/gdb/p-valprint.c @@ -1,6 +1,6 @@ /* Support for printing Pascal values for GDB, the GNU debugger. - Copyright 2000, 2001, 2003 - Free Software Foundation, Inc. + + Copyright 2000, 2001, 2003, 2005 Free Software Foundation, Inc. This file is part of GDB. @@ -591,7 +591,7 @@ static void int, int, enum val_prettyprint, struct type **); void -pascal_object_print_class_method (char *valaddr, struct type *type, +pascal_object_print_class_method (const bfd_byte *valaddr, struct type *type, struct ui_file *stream) { struct type *domain; @@ -1045,7 +1045,7 @@ pascal_object_print_static_field (struct type *type, struct value *val, } void -pascal_object_print_class_member (char *valaddr, struct type *domain, +pascal_object_print_class_member (const bfd_byte *valaddr, struct type *domain, struct ui_file *stream, char *prefix) { |