From: charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Tue, 29 Mar 2005 16:16:42 +0000 (+0000)
Subject: 2005-03-29  Vincent Celier  <celier@adacore.com>
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=4874a890bfec662b6b60634d6877ae249ff9841b;p=thirdparty%2Fgcc.git

2005-03-29  Vincent Celier  <celier@adacore.com>

	* make.adb (Gnatmake): Don't fail if the main project file is declared
	as having no Ada sources. Do not display message "no sources to
	compile" in quiet output.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@97175 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/ada/make.adb b/gcc/ada/make.adb
index 9c115563a6c3..563b77255194 100644
--- a/gcc/ada/make.adb
+++ b/gcc/ada/make.adb
@@ -3931,10 +3931,20 @@ package body Make is
                         All_Projects => Unique_Compile_All_Projects,
                         Into_Q       => False);
 
-                     --  If there are no sources to compile, we fail
+                     --  If no sources to compile, then there is nothing to do
 
                      if Osint.Number_Of_Files = 0 then
-                        Make_Failed ("no sources to compile");
+                        if not Debug.Debug_Flag_N then
+                           Delete_Mapping_Files;
+                           Prj.Env.Delete_All_Path_Files (Project_Tree);
+                        end if;
+
+                        if not Quiet_Output then
+                           Osint.Write_Program_Name;
+                           Write_Line (": no sources to compile");
+                        end if;
+
+                        Exit_Program (E_Success);
                      end if;
                   end if;