From c1efebf99e1d1fc1f196fbe3b3222ac3cc19c262 Mon Sep 17 00:00:00 2001 From: charlet Date: Thu, 17 Jul 2014 06:12:09 +0000 Subject: 2014-07-17 Robert Dewar * exp_ch7.adb, exp_ch7.ads, sinfo.ads: Minor reformatting. 2014-07-17 Ed Schonberg * sem_case.adb (Check_Choice_Set): If the case expression is the expression in a predicate, do not recheck coverage against itself, to prevent spurious errors. * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Indicate that expression comes from an aspect specification, to prevent spurious errors when expression is a case expression in a predicate. 2014-07-17 Pascal Obry * adaint.c, adaint.h (__gnat_set_executable): Add mode parameter. * s-os_lib.ads, s-os_lib.adb (Set_Executable): Add Mode parameter. 2014-07-17 Vincent Celier * gnatchop.adb, make.adb, gnatbind.adb, clean.adb, gprep.adb, gnatxref.adb, gnatls.adb, gnatfind.adb, gnatname.adb: Do not output the usage for an erroneous invocation of a gnat tool. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@212716 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/exp_ch7.ads | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'gcc/ada/exp_ch7.ads') diff --git a/gcc/ada/exp_ch7.ads b/gcc/ada/exp_ch7.ads index 6055ce0d42f..ba141cbe3f8 100644 --- a/gcc/ada/exp_ch7.ads +++ b/gcc/ada/exp_ch7.ads @@ -295,11 +295,12 @@ package Exp_Ch7 is procedure Store_Before_Actions_In_Scope (L : List_Id); -- Append the list L of actions to the end of the before-actions store in - -- the top of the scope stack. + -- the top of the scope stack (also analyzes these actions). procedure Store_After_Actions_In_Scope (L : List_Id); -- Prepend the list L of actions to the beginning of the after-actions - -- store in the top of the scope stack. + -- stored in the top of the scope stack (also analyzes these actions). + -- Why prepend rather than append ??? procedure Wrap_Transient_Declaration (N : Node_Id); -- N is an object declaration. Expand the finalization calls after the -- cgit v1.2.1