aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-lang.h
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@gnat.com>2008-01-03 12:30:38 +0000
committerJoel Brobecker <brobecker@gnat.com>2008-01-03 12:30:38 +0000
commit1ed6ede0102f09c717fb707bd27e7d224c77f9ef (patch)
treece406cc88855238d99b060711feaff9c2acf3b08 /gdb/ada-lang.h
parent542a88d0e44f1435c18e1dd02bcdf55f14b98583 (diff)
downloadgdb-1ed6ede0102f09c717fb707bd27e7d224c77f9ef.zip
gdb-1ed6ede0102f09c717fb707bd27e7d224c77f9ef.tar.gz
gdb-1ed6ede0102f09c717fb707bd27e7d224c77f9ef.tar.bz2
* ada-lang.c (ada_value_struct_elt, to_fixed_array_type)
(to_fixed_array_type, ada_to_fixed_value_create, unwrap_value): Update calls to ada_to_fixed_type. (ada_template_to_fixed_record_type_1): Ditto, but without looking for the tag. (ada_to_fixed_type): Add check_tag parameter; do not look for tag if null. When looking for a tag, use a fixed record type. * ada-lang.h (ada_to_fixed_type): Add check_tag parameter. * ada-valprint.c (printable_val_type, ada_value_print): Update calls to ada_to_fixed_type.
Diffstat (limited to 'gdb/ada-lang.h')
-rw-r--r--gdb/ada-lang.h3
1 files changed, 2 insertions, 1 deletions
diff --git a/gdb/ada-lang.h b/gdb/ada-lang.h
index 650bdb8..ed56583 100644
--- a/gdb/ada-lang.h
+++ b/gdb/ada-lang.h
@@ -421,7 +421,8 @@ extern int ada_which_variant_applies (struct type *, struct type *,
const gdb_byte *);
extern struct type *ada_to_fixed_type (struct type *, const gdb_byte *,
- CORE_ADDR, struct value *);
+ CORE_ADDR, struct value *,
+ int check_tag);
extern struct type *ada_template_to_fixed_record_type_1 (struct type *type,
const gdb_byte *valaddr,