From 9c0b670b6f336aeb56e5b83b34163977e2a2b79b Mon Sep 17 00:00:00 2001 From: charlet Date: Mon, 1 Aug 2011 13:50:27 +0000 Subject: 2011-08-01 Robert Dewar * make.adb, sem_ch4.adb: Minor reformatting. * gcc-interface/Make-lang.in: Update dependencies. * sem_util.adb, exp_ch5.adb: Minor reformatting. 2011-08-01 Arnaud Charlet * gnat_rm.texi: Fix definition of Long_Integer. 2011-08-01 Ed Schonberg * exp_aggr.adb: check limit size of static aggregate unconditionally, to prevent storage exhaustion. * exp_ch7.adb (Clean_Simple_Protected_Objects): if the scope being finalized is a function body, insert the cleanup code before the final return statement, to prevent spurious warnings. * s-pooglo.ads: add overriding indicator. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177035 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/exp_ch5.adb | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'gcc/ada/exp_ch5.adb') diff --git a/gcc/ada/exp_ch5.adb b/gcc/ada/exp_ch5.adb index ef77ec938cb..8acbd877cc7 100644 --- a/gcc/ada/exp_ch5.adb +++ b/gcc/ada/exp_ch5.adb @@ -2767,10 +2767,10 @@ package body Exp_Ch5 is I_Spec : constant Node_Id := Iterator_Specification (Isc); Id : constant Entity_Id := Defining_Identifier (I_Spec); - Container : constant Node_Id := Name (I_Spec); - -- An expression whose type is an array or a predefined container. + Container : constant Node_Id := Name (I_Spec); + -- An expression whose type is an array or a predefined container - Typ : constant Entity_Id := Etype (Container); + Typ : constant Entity_Id := Etype (Container); Cursor : Entity_Id; New_Loop : Node_Id; -- cgit v1.2.1