diff options
Diffstat (limited to 'gdb/ada-valprint.c')
| -rw-r--r-- | gdb/ada-valprint.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gdb/ada-valprint.c b/gdb/ada-valprint.c index 31f3a50..010446d 100644 --- a/gdb/ada-valprint.c +++ b/gdb/ada-valprint.c @@ -609,7 +609,8 @@ print_field_values (struct value *value, struct value *outer_value, if (ada_is_wrapper_field (type, i)) { - struct value *field_val = value_field (value, i); + struct value *field_val = ada_value_primitive_field (value, 0, + i, type); comma_needed = print_field_values (field_val, field_val, stream, recurse, options, |