This is the mail archive of the
gcc-cvs@gcc.gnu.org
mailing list for the GCC project.
r138493 - /trunk/gcc/ada/exp_ch6.adb
- From: charlet at gcc dot gnu dot org
- To: gcc-cvs at gcc dot gnu dot org
- Date: Fri, 01 Aug 2008 09:29:30 -0000
- Subject: r138493 - /trunk/gcc/ada/exp_ch6.adb
Author: charlet
Date: Fri Aug 1 09:29:30 2008
New Revision: 138493
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=138493
Log:
2008-08-01 Gary Dismukes <dismukes@adacore.com>
* exp_ch6.adb (Expand_Call): Adjustment to previous fix for passing
correct accessibility levels. In the "when others" case, retrieve the
access level of the Etype of Prev rather than Prev_Orig, because the
original exression has not always been analyzed.
Modified:
trunk/gcc/ada/exp_ch6.adb