exp_aggr.adb (Build_Array_Aggr_Code): Rename variable "Others_Mbox_Present" to "Other...
authorEd Schonberg <schonberg@adacore.com>
Wed, 15 Feb 2006 09:37:33 +0000 (10:37 +0100)
committerArnaud Charlet <charlet@gcc.gnu.org>
Wed, 15 Feb 2006 09:37:33 +0000 (10:37 +0100)
commitd8f7b976d7f6ba52d1b71770c6d03ff408294b18
treed267110108382a32072ef46ea1481ea04c204e4e
parent2c351f04f4026e765c15fcb5a74c809573dc666a
exp_aggr.adb (Build_Array_Aggr_Code): Rename variable "Others_Mbox_Present" to "Others_Box_Present" because the mbox...

2006-02-13  Ed Schonberg  <schonberg@adacore.com>

* exp_aggr.adb (Build_Array_Aggr_Code): Rename variable
"Others_Mbox_Present" to "Others_Box_Present" because the mbox concept
does not exist in the Ada RM.
(Compatible_Int_Bounds): Determine whether two integer range bounds
are of equal length and have the same start and end values.
(Is_Int_Range_Bounds): Determine whether a node is an integer range.
(Build_Record_Aggr_Code): Perform proper sliding of a nested array
aggregate when it is part of an object declaration.
(Build_Record_Aggr_Code)  If the aggregate ttype is a derived type that
constrains discriminants of its parent, add explicitly the discriminant
constraints of the ancestor by retrieving them from the
stored_constraint of the parent.

From-SVN: r111057
gcc/ada/exp_aggr.adb