struct frame_info;
struct inferior;
+struct type_print_options;
#include "value.h"
#include "gdbtypes.h"
struct symbol *sym;
/* The block where the symbol was found. */
- struct block *block;
+ const struct block *block;
};
/* Denotes a type of renaming symbol (see ada_parse_renaming). */
/* Defined in ada-typeprint.c */
extern void ada_print_type (struct type *, const char *, struct ui_file *, int,
- int);
+ int, const struct type_print_options *);
extern void ada_print_typedef (struct type *type, struct symbol *new_symbol,
struct ui_file *stream);
extern const char *ada_tag_name (struct value *);
+extern struct value *ada_tag_value_at_base_address (struct value *obj);
+
extern int ada_is_parent_field (struct type *, int);
extern int ada_is_wrapper_field (struct type *, int);
extern LONGEST get_int_var_value (char *, int *);
extern struct symbol *ada_find_renaming_symbol (struct symbol *name_sym,
- struct block *block);
+ const struct block *block);
extern int ada_prefer_type (struct type *, struct type *);