OSDN Git Service

2010-06-22 Gary Dismukes <dismukes@adacore.com>
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 22 Jun 2010 07:15:42 +0000 (07:15 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 22 Jun 2010 07:15:42 +0000 (07:15 +0000)
commitd972a221e175304362bd9e2ead885c1687a31d46
treef305957525805e053d232bcc80e2285f8c3acb22
parent56854dfd7615a4fda4d348df3aa86b4ff39b8468
2010-06-22  Gary Dismukes  <dismukes@adacore.com>

* exp_util.adb (Find_Interface_ADT): Retrieve Designated_Type instead of
Directly_Designated_Type when the type argument is an access type.
(Find_Interface_Tag): Retrieve Designated_Type instead of
Directly_Designated_Type when the type argument is an access type.
(Has_Controlled_Coextensions): Retrieve Designated_Type instead of
Directly_Designated_Type of each access discriminant.
* sem_res.adb (Resolve_Type_Conversion): Retrieve Designated_Type
instead of Directly_Designated_Type when the operand and target types
are access types.

2010-06-22  Thomas Quinot  <quinot@adacore.com>

* exp_aggr.adb (Flatten): Return False if one choice is statically
known to be out of bounds.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@161137 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/ada/ChangeLog
gcc/ada/exp_aggr.adb
gcc/ada/exp_util.adb
gcc/ada/sem_res.adb