diff options
| author | Tom Tromey <tom@tromey.com> | 2020-03-13 17:39:52 -0600 |
|---|---|---|
| committer | Tom Tromey <tom@tromey.com> | 2020-03-13 18:03:40 -0600 |
| commit | 1e592a8ae0985645e61f6ffbfee064af8826b457 (patch) | |
| tree | 9ecf4ec8daaca2453909a84a0a8f3f3d39f63d5f | |
| parent | 7fe471e9ae8dbc61b898f7572fed31c4224a0b89 (diff) | |
| download | binutils-1e592a8ae0985645e61f6ffbfee064af8826b457.zip binutils-1e592a8ae0985645e61f6ffbfee064af8826b457.tar.gz binutils-1e592a8ae0985645e61f6ffbfee064af8826b457.tar.bz2 | |
Make pascal_object_print_value_fields static
pascal_object_print_value_fields is only needed in p-valprint.c, so
make it static.
gdb/ChangeLog
2020-03-13 Tom Tromey <tom@tromey.com>
* p-valprint.c (pascal_object_print_value_fields): Now static.
* p-lang.h (pascal_object_print_value_fields): Don't declare.
| -rw-r--r-- | gdb/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/p-lang.h | 8 | ||||
| -rw-r--r-- | gdb/p-valprint.c | 10 |
3 files changed, 14 insertions, 9 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 74ad18e..734f77e 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,10 @@ 2020-03-13 Tom Tromey <tom@tromey.com> + * p-valprint.c (pascal_object_print_value_fields): Now static. + * p-lang.h (pascal_object_print_value_fields): Don't declare. + +2020-03-13 Tom Tromey <tom@tromey.com> + * c-valprint.c (c_val_print_array): Simplify. 2020-03-13 Tom Tromey <tom@tromey.com> diff --git a/gdb/p-lang.h b/gdb/p-lang.h index 7c2b442..960d129 100644 --- a/gdb/p-lang.h +++ b/gdb/p-lang.h @@ -72,14 +72,6 @@ extern void pascal_type_print_varspec_prefix (struct type *, struct ui_file *, int, int, const struct type_print_options *); -extern void pascal_object_print_value_fields (struct type *, const gdb_byte *, - LONGEST, - CORE_ADDR, struct ui_file *, - int, - struct value *, - const struct value_print_options *, - struct type **, int); - extern int pascal_object_is_vtbl_ptr_type (struct type *); extern int pascal_object_is_vtbl_member (struct type *); diff --git a/gdb/p-valprint.c b/gdb/p-valprint.c index 7d08755..68e8c6e 100644 --- a/gdb/p-valprint.c +++ b/gdb/p-valprint.c @@ -42,6 +42,14 @@ #include "cli/cli-style.h" +static void pascal_object_print_value_fields (struct type *, const gdb_byte *, + LONGEST, + CORE_ADDR, struct ui_file *, + int, + struct value *, + const struct value_print_options *, + struct type **, int); + /* Decorations for Pascal. */ static const struct generic_val_print_decorations p_decorations = @@ -529,7 +537,7 @@ pascal_object_is_vtbl_member (struct type *type) DONT_PRINT is an array of baseclass types that we should not print, or zero if called from top level. */ -void +static void pascal_object_print_value_fields (struct type *type, const gdb_byte *valaddr, LONGEST offset, CORE_ADDR address, struct ui_file *stream, |