diff options
| author | Tom Tromey <tom@tromey.com> | 2023-01-31 07:52:09 -0700 |
|---|---|---|
| committer | Tom Tromey <tom@tromey.com> | 2023-02-13 15:21:06 -0700 |
| commit | d0c9791728caa0d3b3270a997c7fd97919976c97 (patch) | |
| tree | 1753b7232efa89e05696d4289d60ad019fc161e4 /gdb/ada-tasks.c | |
| parent | 7cf57bc5be656c62cc6b80280a9eddad2b8ded3f (diff) | |
| download | gdb-d0c9791728caa0d3b3270a997c7fd97919976c97.zip gdb-d0c9791728caa0d3b3270a997c7fd97919976c97.tar.gz gdb-d0c9791728caa0d3b3270a997c7fd97919976c97.tar.bz2 | |
Turn value_type into method
This changes value_type to be a method of value. Much of this patch
was written by script.
Approved-By: Simon Marchi <simon.marchi@efficios.com>
Diffstat (limited to 'gdb/ada-tasks.c')
| -rw-r--r-- | gdb/ada-tasks.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/ada-tasks.c b/gdb/ada-tasks.c index a3a2806..979d64a 100644 --- a/gdb/ada-tasks.c +++ b/gdb/ada-tasks.c @@ -457,7 +457,7 @@ read_fat_string_value (char *dest, struct value *val, int max_len) to extract the string from the fat string. */ if (initialize_fieldnos) { - struct type *type = value_type (val); + struct type *type = val->type (); struct type *bounds_type; array_fieldno = ada_get_field_index (type, "P_ARRAY", 0); @@ -784,7 +784,7 @@ read_atcb (CORE_ADDR task_id, struct ada_task_info *task_info) value_subscript (entry_calls_value, value_as_long (atc_nesting_level_value)); called_task_fieldno = - ada_get_field_index (value_type (entry_calls_value_element), + ada_get_field_index (entry_calls_value_element->type (), "called_task", 0); task_info->called_task = value_as_address (value_field (entry_calls_value_element, |