* ada-lang.c (ada_lookup_symbol): Correct comment.
authorPaul N. Hilfinger <hilfinger@adacore.com>
Fri, 15 Oct 2004 09:12:24 +0000 (09:12 +0000)
committerPaul N. Hilfinger <hilfinger@adacore.com>
Fri, 15 Oct 2004 09:12:24 +0000 (09:12 +0000)
commit714e53abdada80ad3b1223528e2aa2fac51436a5
tree0499eee20f9c0717205160937b989559f314952e
parent296391227bd7f0c0b1804f5a7afced16daf90c37
* ada-lang.c (ada_lookup_symbol): Correct comment.
(ada_evaluate_subexp): Change error message for
OP_FUNCALL case so as not to indicate an internal error.

From Joel Brobecker; committed by Paul Hilfinger.
* ada-lang.c (ada_template_to_fixed_record_type_1): Detect bogus
type sizes in XVE/XVU types, and emit a warning when that happens,
instead of rounding up the size of the resulting type.
Some minor reformatting.
(ada_is_aligner_type): Do not consider a type as an aligner type
if there is a corresponding XVS type as well.
(ada_evaluate_subexp): For TERNOP_SLICE, handle cases where we
have several levels of pointer indirection to the array.

From Jerome Guitton; committed by Paul Hilfinger.
* ada-lang.c (check_size): New function.
(coerce_unspec_val_to_type): call check_size to make sure
that the object size is reasonable.
(ada_evaluate_subexp): in UNOP_IND: Ditto. In TERNOP_SLICE:
Implements the case when we get a reference when we evaluate
the expression of one of the bounds of the slice.
(ada_value_struct_elt): when a packed array field is
a reference, use ada_coerce_ref to dereference it; use
ada_value_ind only if it is a pointer.
gdb/ChangeLog
gdb/ada-lang.c