This is the mail archive of the
gcc-cvs@gcc.gnu.org
mailing list for the GCC project.
r133560 - in /trunk/gcc/ada: exp_ch11.adb restr...
- From: charlet at gcc dot gnu dot org
- To: gcc-cvs at gcc dot gnu dot org
- Date: Wed, 26 Mar 2008 07:38:29 -0000
- Subject: r133560 - in /trunk/gcc/ada: exp_ch11.adb restr...
Author: charlet
Date: Wed Mar 26 07:38:28 2008
New Revision: 133560
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=133560
Log:
2008-03-26 Robert Dewar <dewar@adacore.com>
Arnaud Charlet <charlet@adacore.com>
* exp_ch11.adb (Expand_At_End_Handler): Set From_At_End flag on raise
stmt.
(No_Exception_Propagation_Active): New function.
(Expand_Exception_Handlers): Use No_Exception_Propagation_Active.
Update comments, and review all uses of No_Exception_Propagation, which
are now correct and in sync with what gigi expects.
* restrict.ads, restrict.adb (No_Exception_Propagation_Active): New
function.
(Expand_Exception_Handlers): Use No_Exception_Propagation_Active.
Update comments, and review all uses of No_Exception_Propagation, which
are now correct and in sync with what gigi expects.
Modified:
trunk/gcc/ada/exp_ch11.adb
trunk/gcc/ada/restrict.adb
trunk/gcc/ada/restrict.ads