diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-10-18 12:03:30 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-10-18 12:03:30 +0200 |
| commit | e7efbe2f093468f9316e891136833aae0e404a24 (patch) | |
| tree | 5b2b67273a354c215e6a9d10700a644c9303f9a8 /gcc/ada/prj.ads | |
| parent | ef2a63ba1869942eae7ab3ceb4cada0f025a60ad (diff) | |
| download | gcc-e7efbe2f093468f9316e891136833aae0e404a24.zip gcc-e7efbe2f093468f9316e891136833aae0e404a24.tar.gz gcc-e7efbe2f093468f9316e891136833aae0e404a24.tar.bz2 | |
[multiple changes]
2010-10-18 Tristan Gingold <gingold@adacore.com>
* init.c: Indentation, and minor changes to more closely follow GNU
style rules. Make more variable statics.
2010-10-18 Vincent Celier <celier@adacore.com>
* 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 <celier@adacore.com>
* 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
Diffstat (limited to 'gcc/ada/prj.ads')
| -rw-r--r-- | gcc/ada/prj.ads | 5 |
1 files changed, 5 insertions, 0 deletions
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, |