sem_ch3.adb (Build_Derived_Record_Type): Remove the propagation of all attributes...
authorHristian Kirtchev <kirtchev@adacore.com>
Fri, 17 Oct 2014 08:34:54 +0000 (08:34 +0000)
committerArnaud Charlet <charlet@gcc.gnu.org>
Fri, 17 Oct 2014 08:34:54 +0000 (10:34 +0200)
commit38d0d6c854d9fc64b2c52a73af8db8af247eb0b7
tree5ab598074681488f2e0dbd99ef2db8c2421b575d
parent2211a35ffa12f3587be9ace59307205cbed4a2cf
sem_ch3.adb (Build_Derived_Record_Type): Remove the propagation of all attributes related to pragma...

2014-10-17  Hristian Kirtchev  <kirtchev@adacore.com>

* sem_ch3.adb (Build_Derived_Record_Type): Remove the propagation
of all attributes related to pragma Default_Initial_Condition.
(Build_Derived_Type): Propagation of all attributes related
to pragma Default_Initial_Condition.
(Process_Full_View): Account for the case where the full view derives
from another private type and propagate the attributes related
to pragma Default_Initial_Condition to the private view.
(Propagate_Default_Init_Cond_Attributes): New routine.
* sem_util.adb: Alphabetize various routines.
(Build_Default_Init_Cond_Call): Use an unchecked type conversion
when calling the default initial condition procedure of a private type.
(Build_Default_Init_Cond_Procedure_Declaration): Prevent
the generation of multiple default initial condition procedures.

From-SVN: r216370
gcc/ada/ChangeLog
gcc/ada/sem_ch3.adb
gcc/ada/sem_util.adb