From 3d3026cf4f85b2a7c9e9b780d30552e3258c131d Mon Sep 17 00:00:00 2001
From: Vincent Celier <celier@adacore.com>
Date: Tue, 29 Mar 2005 18:16:42 +0200
Subject: [PATCH] make.adb (Gnatmake): Don't fail if the main project file is
 declared as having no Ada sources.

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.

From-SVN: r97175
---
 gcc/ada/make.adb | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

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;
 
-- 
GitLab