diff mbox

[Ada] Directories are no longer created for abstract projects

Message ID 20141017091127.GA29869@adacore.com
State New
Headers show

Commit Message

Arnaud Charlet Oct. 17, 2014, 9:11 a.m. UTC 
Directories such as object directories are no longer created for abstract
projects when the builder (gnatmake or gprbuild) is called with -P or
with --subdirs=<...>, even when there is no explicit indication in the
abstract project that there are no sources in the project.

Tested on x86_64-pc-linux-gnu, committed on trunk

2014-10-17  Vincent Celier  <celier@adacore.com>

	* prj-nmsc.adb (Get_Directories): Do not create directories
	when a project is abstract.
diff mbox

Patch

Index: prj-nmsc.adb
===================================================================
--- prj-nmsc.adb	(revision 216367)
+++ prj-nmsc.adb	(working copy)
@@ -5498,13 +5498,15 @@ 
       Dir_Exists : Boolean;
 
       No_Sources : constant Boolean :=
-                     ((not Source_Files.Default
+                     Project.Qualifier = Abstract_Project
+                       or else
+                     (((not Source_Files.Default
                         and then Source_Files.Values = Nil_String)
                        or else (not Source_Dirs.Default
                                  and then Source_Dirs.Values = Nil_String)
                        or else (not Languages.Default
                                  and then Languages.Values = Nil_String))
-                     and then Project.Extends = No_Project;
+                     and then Project.Extends = No_Project);
 
    --  Start of processing for Get_Directories