diff options
| author | Vincent Celier <celier@adacore.com> | 2005-03-29 18:16:42 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2005-03-29 18:16:42 +0200 |
| commit | 3d3026cf4f85b2a7c9e9b780d30552e3258c131d (patch) | |
| tree | 54178cc2ef81941a1033538e0fa396eb6d179b9c /gcc/ada | |
| parent | 49e90211a68eab8bda19cd4ed04025da8e05e8da (diff) | |
| download | gcc-3d3026cf4f85b2a7c9e9b780d30552e3258c131d.zip gcc-3d3026cf4f85b2a7c9e9b780d30552e3258c131d.tar.gz gcc-3d3026cf4f85b2a7c9e9b780d30552e3258c131d.tar.bz2 | |
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
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/make.adb | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/gcc/ada/make.adb b/gcc/ada/make.adb index 9c11556..563b772 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; |