diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-01-21 08:57:53 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-01-21 08:57:53 +0100 |
| commit | 6b6041ec651c69871cc4c8d0ba3621c575b97e75 (patch) | |
| tree | 695e62bceda250d6591337f5ed5f9898a0e29048 /gcc/ada/exp_ch4.adb | |
| parent | 77a2f3df910f3b32cb0cbc3b6967c229d5680272 (diff) | |
| download | gcc-6b6041ec651c69871cc4c8d0ba3621c575b97e75.zip gcc-6b6041ec651c69871cc4c8d0ba3621c575b97e75.tar.gz gcc-6b6041ec651c69871cc4c8d0ba3621c575b97e75.tar.bz2 | |
[multiple changes]
2014-01-21 Arnaud Charlet <charlet@adacore.com>
* exp_ch9.adb (Expand_N_Selective_Accept.Add_Accept): Always add
call to Abort_Undefer, as expected by the runtime.
* s-tasren.adb (Local_Complete_Rendezvous): Replace
Defer_Abort_Nestable by Defer_Abort, since we do not expect abort to be
deferred at this point. Update comments.
2014-01-21 Thomas Quinot <quinot@adacore.com>
* exp_ch4.adb, exp_ch5.adb, checks.adb: Minor reformatting.
2014-01-21 Arnaud Charlet <charlet@adacore.com>
* switch-c.adb, usage.adb, gnat_ugn.texi: Mark -gnates as internal,
remove from doc.
From-SVN: r206873
Diffstat (limited to 'gcc/ada/exp_ch4.adb')
| -rw-r--r-- | gcc/ada/exp_ch4.adb | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/gcc/ada/exp_ch4.adb b/gcc/ada/exp_ch4.adb index 7d1ec81..aa39586 100644 --- a/gcc/ada/exp_ch4.adb +++ b/gcc/ada/exp_ch4.adb @@ -958,7 +958,7 @@ package body Exp_Ch4 is -- [Deep_]Adjust (Temp.all); -- We analyze by hand the new internal allocator to avoid any - -- recursion and inappropriate call to Initialize + -- recursion and inappropriate call to Initialize. -- We don't want to remove side effects when the expression must be -- built in place. In the case of a build-in-place function call, @@ -1046,8 +1046,7 @@ package body Exp_Ch4 is then Insert_Action (N, Make_Attach_Call ( - Obj_Ref => - New_Reference_To (Temp, Loc), + Obj_Ref => New_Reference_To (Temp, Loc), Ptr_Typ => PtrT)); end if; |