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.
This commit is contained in:
Tom Tromey 2020-03-13 17:39:52 -06:00
parent 7fe471e9ae
commit 1e592a8ae0
3 changed files with 14 additions and 9 deletions

View File

@ -1,3 +1,8 @@
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.

View File

@ -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 *);

View File

@ -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,