From 5d6b98f60dbf269c822dce4af2b15d341a8f22f4 Mon Sep 17 00:00:00 2001 From: charlet Date: Mon, 13 Jul 2009 10:52:34 +0000 Subject: 2009-07-13 Emmanuel Briot * prj.adb, prj.ads, prj-env.adb, prj-conf.adb, prj-tree.adb, mlib-prj.adb (Private_Part.Ada_Prj_Objects_File_Set, Ada_Prj_Include_File_Set): Removed, since not needed Code clean up. 2009-07-13 Ed Schonberg * sem_ch4.adb (Analyze_Set_Membership): New procedure, subsidiary of Analyze_Membership_Op. * sem_res.adb (Resolve_Set_Membership): New procedure, subsidiary of Resolve_Membership_Op. * exp_ch4.adb (Expand_Set_Membership): New procedure, subsidiary of Expand_N_In. 2009-07-13 Robert Dewar * clean.adb: Minor reformattting git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@149569 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/clean.adb | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'gcc/ada/clean.adb') diff --git a/gcc/ada/clean.adb b/gcc/ada/clean.adb index e4d438732b5..790b8423529 100644 --- a/gcc/ada/clean.adb +++ b/gcc/ada/clean.adb @@ -1045,13 +1045,14 @@ package body Clean is Proj := Project_Tree.Projects; while Proj /= null loop - -- for gnatmake, when the project specifies more than - -- Ada as a language (even if course we could not find - -- any source file for the other languages), we will - -- take all object files found in the object + -- For gnatmake, when the project specifies more than + -- just Ada as a language (even if course we could not + -- find any source file for the other languages), we + -- will take all the object files found in the object -- directories. Since we know the project supports at -- least Ada, we just have to test whether it has at - -- least two languages, and not care about the sources + -- least two languages, and we do not care about the + -- sources. if Proj.Project.Languages /= null and then Proj.Project.Languages.Next /= null -- cgit v1.2.1