aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-lang.c
diff options
context:
space:
mode:
authorJim Blandy <jimb@codesourcery.com>2006-12-01 00:32:29 +0000
committerJim Blandy <jimb@codesourcery.com>2006-12-01 00:32:29 +0000
commit4155b94b2ced1e636363169f2989d646183a7438 (patch)
tree4107fd1b939f028d8c6f8eb8338a18ff423a7e99 /gdb/ada-lang.c
parent1ddbd1e61787c0402eee18fdaa6af9d62034b6b7 (diff)
downloadgdb-4155b94b2ced1e636363169f2989d646183a7438.zip
gdb-4155b94b2ced1e636363169f2989d646183a7438.tar.gz
gdb-4155b94b2ced1e636363169f2989d646183a7438.tar.bz2
2006-11-30 Jim Blandy <jimb@codesourcery.com>
* ada-lang.c (value_subscript_packed): Don't bother to set the lvalue type of the returned value here; ada_value_primitive_packed_val takes care of that.
Diffstat (limited to 'gdb/ada-lang.c')
-rw-r--r--gdb/ada-lang.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index cc63e0a..7de7a19 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -1887,10 +1887,6 @@ value_subscript_packed (struct value *arr, int arity, struct value **ind)
v = ada_value_primitive_packed_val (arr, NULL, elt_off, bit_off,
bits, elt_type);
- if (VALUE_LVAL (arr) == lval_internalvar)
- VALUE_LVAL (v) = lval_internalvar_component;
- else
- VALUE_LVAL (v) = VALUE_LVAL (arr);
return v;
}