aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-lang.c
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/ada-lang.c')
-rw-r--r--gdb/ada-lang.c3
1 files changed, 0 insertions, 3 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index ef808c4..c202173 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -9029,7 +9029,6 @@ assign_aggregate (struct value *container,
int num_specs;
LONGEST *indices;
int max_indices, num_indices;
- int is_array_aggregate;
int i;
*pos += 3;
@@ -9054,13 +9053,11 @@ assign_aggregate (struct value *container,
lhs_type = value_type (lhs);
low_index = TYPE_ARRAY_LOWER_BOUND_VALUE (lhs_type);
high_index = TYPE_ARRAY_UPPER_BOUND_VALUE (lhs_type);
- is_array_aggregate = 1;
}
else if (TYPE_CODE (lhs_type) == TYPE_CODE_STRUCT)
{
low_index = 0;
high_index = num_visible_fields (lhs_type) - 1;
- is_array_aggregate = 0;
}
else
error (_("Left-hand side must be array or record."));