makegpr.adb (Link_Executables): Do not fail when the root project has no sources, but is an extending project.

2007-09-26  Vincent Celier  <celier@adacore.com>

	* makegpr.adb (Link_Executables): Do not fail when the root project has
	no sources, but is an extending project.

From-SVN: r128809
This commit is contained in:
Vincent Celier 2007-09-26 12:47:19 +02:00 committed by Arnaud Charlet
parent 7954ad60df
commit 43943e4035
1 changed files with 3 additions and 2 deletions

View File

@ -3804,8 +3804,9 @@ package body Makegpr is
-- Only Ada sources in the main project, and even maybe not
if not Data.Langs (Ada_Language_Index) then
if Data.Extends = No_Project and then
not Data.Langs (Ada_Language_Index)
then
-- Fail if the main project has no source of any language
Osint.Fail