diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-05-15 11:46:19 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-05-15 11:46:19 +0200 |
commit | e5a222431f2c38c283040296d398a95e47708b0d (patch) | |
tree | 9fedcb7157eb950243aa5bc85a2679e28d69abe8 /gcc/ada/exp_ch7.ads | |
parent | 5277d0b7109e67d3dd582f5b832723ed8e008cb1 (diff) | |
download | gcc-e5a222431f2c38c283040296d398a95e47708b0d.zip gcc-e5a222431f2c38c283040296d398a95e47708b0d.tar.gz gcc-e5a222431f2c38c283040296d398a95e47708b0d.tar.bz2 |
[multiple changes]
2012-05-15 Tristan Gingold <gingold@adacore.com>
* s-soflin.ads, s-soflin.adb (Save_Library_Occurrence): Parameter
E is now of type Exception_Occurrence_Access.
* exp_ch7.ads, exp_ch7.adb (Build_Exception_Handler): Adjust generated
call to Save_Library_Occurrence.
2012-05-15 Thomas Quinot <quinot@adacore.com>
* exp_ch4.adb (Rewrite_Coextension): Use Insert_Action to
insert temporary variable decl at the proper place in the tree.
From-SVN: r187513
Diffstat (limited to 'gcc/ada/exp_ch7.ads')
-rw-r--r-- | gcc/ada/exp_ch7.ads | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch7.ads b/gcc/ada/exp_ch7.ads index 244936c..2cb4265 100644 --- a/gcc/ada/exp_ch7.ads +++ b/gcc/ada/exp_ch7.ads @@ -89,7 +89,7 @@ package Exp_Ch7 is -- when others => -- if not Raised_Id then -- Raised_Id := True; - -- Save_Library_Occurrence (Get_Current_Excep.all.all); + -- Save_Library_Occurrence (Get_Current_Excep.all); -- end if; -- -- E_Id denotes the defining identifier of a local exception occurrence. |