diff options
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/ChangeLog | 4 | ||||
-rw-r--r-- | gdb/ada-lang.c | 32 |
2 files changed, 20 insertions, 16 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index ea8fb66..0585e1e 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,9 @@ 2011-11-23 Andrey Smirnov <andrew.smirnov@gmail.com> + * ada-lang.c (assign_aggregate): Minor reformatting. + +2011-11-23 Andrey Smirnov <andrew.smirnov@gmail.com> + * ada-lang.c (assign_aggregate): Remove declaration of local variable `i' which is shadowing another variable with the same name declared in the outer scope. diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index 48073fb..e396596 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -8706,24 +8706,24 @@ assign_aggregate (struct value *container, { switch (exp->elts[*pos].opcode) { - case OP_CHOICES: - aggregate_assign_from_choices (container, lhs, exp, pos, indices, + case OP_CHOICES: + aggregate_assign_from_choices (container, lhs, exp, pos, indices, + &num_indices, max_indices, + low_index, high_index); + break; + case OP_POSITIONAL: + aggregate_assign_positional (container, lhs, exp, pos, indices, &num_indices, max_indices, low_index, high_index); - break; - case OP_POSITIONAL: - aggregate_assign_positional (container, lhs, exp, pos, indices, - &num_indices, max_indices, - low_index, high_index); - break; - case OP_OTHERS: - if (i != n-1) - error (_("Misplaced 'others' clause")); - aggregate_assign_others (container, lhs, exp, pos, indices, - num_indices, low_index, high_index); - break; - default: - error (_("Internal error: bad aggregate clause")); + break; + case OP_OTHERS: + if (i != n-1) + error (_("Misplaced 'others' clause")); + aggregate_assign_others (container, lhs, exp, pos, indices, + num_indices, low_index, high_index); + break; + default: + error (_("Internal error: bad aggregate clause")); } } |