mirror of
https://github.com/espressif/binutils-gdb.git
synced 2025-08-06 14:49:38 +08:00
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.
This commit is contained in:
@ -1,5 +1,10 @@
|
|||||||
2005-01-28 Andrew Cagney <cagney@gnu.org>
|
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
|
* language.h (struct language_defn): Make la_printstr's buffer
|
||||||
parameter a const bfd_byte.
|
parameter a const bfd_byte.
|
||||||
* p-lang.h (pascal_printstr): Update function to match.
|
* p-lang.h (pascal_printstr): Update function to match.
|
||||||
|
@ -1,5 +1,6 @@
|
|||||||
/* Pascal language support definitions for GDB, the GNU debugger.
|
/* 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.
|
This file is part of GDB.
|
||||||
|
|
||||||
@ -64,9 +65,11 @@ extern int vtblprint; /* Controls printing of vtbl's */
|
|||||||
|
|
||||||
extern int static_field_print;
|
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,
|
extern void pascal_object_print_value_fields (struct type *, char *, CORE_ADDR,
|
||||||
struct ui_file *, int, int, enum val_prettyprint,
|
struct ui_file *, int, int, enum val_prettyprint,
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
/* Support for printing Pascal values for GDB, the GNU debugger.
|
/* 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.
|
This file is part of GDB.
|
||||||
|
|
||||||
@ -591,7 +591,7 @@ static void
|
|||||||
int, int, enum val_prettyprint, struct type **);
|
int, int, enum val_prettyprint, struct type **);
|
||||||
|
|
||||||
void
|
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 ui_file *stream)
|
||||||
{
|
{
|
||||||
struct type *domain;
|
struct type *domain;
|
||||||
@ -1045,7 +1045,7 @@ pascal_object_print_static_field (struct type *type, struct value *val,
|
|||||||
}
|
}
|
||||||
|
|
||||||
void
|
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)
|
struct ui_file *stream, char *prefix)
|
||||||
{
|
{
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user