diff options
| author | Thomas Quinot <quinot@adacore.com> | 2014-07-17 06:16:25 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-07-17 08:16:25 +0200 |
| commit | f65c67d3402cba1cc2ad95242d04abab5f24759f (patch) | |
| tree | 9cf3ad6c1548c1cbf499777b4f7707fb5518c4f8 /gcc/ada/exp_ch9.adb | |
| parent | a1d3851bcd7404635a0e04846fac7f1561a6e286 (diff) | |
| download | gcc-f65c67d3402cba1cc2ad95242d04abab5f24759f.zip gcc-f65c67d3402cba1cc2ad95242d04abab5f24759f.tar.gz gcc-f65c67d3402cba1cc2ad95242d04abab5f24759f.tar.bz2 | |
exp_ch7.adb (Establish_Transient_Scope.Find_Node_To_Be_Wrapped): Start examining the tree at the node passed to Establish_Transient_Scope (not...
2014-07-17 Thomas Quinot <quinot@adacore.com>
* exp_ch7.adb (Establish_Transient_Scope.Find_Node_To_Be_Wrapped):
Start examining the tree at the node passed to
Establish_Transient_Scope (not its parent).
* exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration):
The access type for the variable storing the reference to
the call must be declared and frozen prior to establishing a
transient scope.
* exp_ch9.adb: Minor reformatting.
From-SVN: r212718
Diffstat (limited to 'gcc/ada/exp_ch9.adb')
| -rw-r--r-- | gcc/ada/exp_ch9.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch9.adb b/gcc/ada/exp_ch9.adb index db66a8a..c5bd57a 100644 --- a/gcc/ada/exp_ch9.adb +++ b/gcc/ada/exp_ch9.adb @@ -4377,7 +4377,7 @@ package body Exp_Ch9 is pragma Assert (Ekind (Sub) = E_Function); Rewrite (N, Make_Function_Call (Loc, - Name => New_Sub, + Name => New_Sub, Parameter_Associations => Params)); end if; |