exp_ch7.adb (Find_Final_List): Change the test for generating a selected component...
commitdcfa065d7cd329cdacd200032668a6480251c7cd
authorGary Dismukes <dismukes@adacore.com>
Tue, 8 Apr 2008 06:50:34 +0000 (8 08:50 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Tue, 8 Apr 2008 06:50:34 +0000 (8 08:50 +0200)
treebd2575cfbe03f09f77f3d9f21eb0bcc61245288f
parent70f9118087173b00e6aed0bcd14a5e901955ddf0
exp_ch7.adb (Find_Final_List): Change the test for generating a selected component from an access type's...

2008-04-08  Gary Dismukes  <dismukes@adacore.com>
    Thomas Quinot  <quinot@adacore.com>

* exp_ch7.adb (Find_Final_List): Change the test for generating a
selected component from an access type's Associated_Final_Chain to
check for the presence of that field, rather than assuming it exists
for all named access types.
(Make_Clean): New formal Chained_Cleanup_Action allowing to specify a
procedure to call at the end of the generated cleanup procedure.
(Expand_Cleanup_Actions): When a new cleanup procedure is generated, and
and an At_End_Proc already exists in the handled sequence of statements
for which cleanup actions are being expanded, the original cleanup
action must be preserved.

From-SVN: r134029
gcc/ada/exp_ch7.adb