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.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 8681d9444a6ab591a6ca01b5f9af4b5356dcce81..8c64b53070ade46fe62e80298eebdbb319065df5 100644 (file)
--- 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 0f1ef81c07ed4262be26954dcaeee573807d8ceb..fff466642641d0d864b9e7ddc0c88da3af072176 100644 (file)
--- 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 e320c19d98144d564fdef256eb482646ca46789e..21d21104338a4443bb414a84f59795801152da17 100644 (file)
--- 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)
 {