This is the mail archive of the
gcc-cvs@gcc.gnu.org
mailing list for the GCC project.
r135622 - /trunk/gcc/ada/exp_ch5.adb
- From: charlet at gcc dot gnu dot org
- To: gcc-cvs at gcc dot gnu dot org
- Date: Tue, 20 May 2008 12:45:38 -0000
- Subject: r135622 - /trunk/gcc/ada/exp_ch5.adb
Author: charlet
Date: Tue May 20 12:45:38 2008
New Revision: 135622
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=135622
Log:
2008-05-20 Ed Schonberg <schonberg@adacore.com>
* exp_ch5.adb (Expand_Assign_Record): Within an initialization
procedure for a derived type retrieve the discriminant values from the
parent using the corresponding discriminant.
(Expand_N_Assignment_Statement): Skip generation of implicit
if-statement associated with controlled types if we are
compiling with restriction No_Finalization.
Modified:
trunk/gcc/ada/exp_ch5.adb