From e7efbe2f093468f9316e891136833aae0e404a24 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Mon, 18 Oct 2010 12:03:30 +0200 Subject: [multiple changes] 2010-10-18 Tristan Gingold * init.c: Indentation, and minor changes to more closely follow GNU style rules. Make more variable statics. 2010-10-18 Vincent Celier * prj.adb (Is_Compilable): On first call for a source, cache value in component Compilable. * prj.ads (Source_Data): New component Compilable, to cache the value returned by function Is_Compilable. 2010-10-18 Vincent Celier * prj-attr.adb: New project level attribute Ignore_Source_Sub_Dirs. * prj-nmsc.adb (Expand_Subdirectory_Pattern): New string list parameter Ignore. (Recursive_Find_Dirs): Do not consider subdirectories listed in Ignore. (Get_Directories): Call Find_Source_Dirs with the string list indicated by attribute Ignore_Source_Sub_Dirs. * snames.ads-tmpl: New standard name Ignore_Source_Sub_Dirs. From-SVN: r165619 --- gcc/ada/prj.ads | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'gcc/ada/prj.ads') diff --git a/gcc/ada/prj.ads b/gcc/ada/prj.ads index 95ead56..dd3c981 100644 --- a/gcc/ada/prj.ads +++ b/gcc/ada/prj.ads @@ -706,6 +706,10 @@ package Prj is -- file). Index is 0 if there is either no unit or a single one, and -- starts at 1 when there are multiple units + Compilable : Yes_No_Unknown := Unknown; + -- Updated at the first call to Is_Compilable. Yes if source file is + -- compilable. + Locally_Removed : Boolean := False; -- True if the source has been "excluded" @@ -788,6 +792,7 @@ package Prj is Unit => No_Unit_Index, Index => 0, Locally_Removed => False, + Compilable => Unknown, Replaced_By => No_Source, File => No_File, Display_File => No_File, -- cgit v1.1