aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/prj-nmsc.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2011-12-21 13:08:32 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2011-12-21 13:08:32 +0100
commitd781a615178f19d07f64ae7acb6767f1b25b4a08 (patch)
tree26ca1c255dd04777bafb497cf327cb8fe206d9b8 /gcc/ada/prj-nmsc.adb
parentdea1d3dcea17dfb21bf403133dcc6acd0cad6c29 (diff)
downloadgcc-d781a615178f19d07f64ae7acb6767f1b25b4a08.zip
gcc-d781a615178f19d07f64ae7acb6767f1b25b4a08.tar.gz
gcc-d781a615178f19d07f64ae7acb6767f1b25b4a08.tar.bz2
[multiple changes]
2011-12-21 Arnaud Charlet <charlet@adacore.com> * comperr.adb (Delete_SCIL_Files): Also delete .scilx files. Fix implementation for child packages and package specs. (Delete_SCIL_Files.Decode_Name_Buffer): New function. 2011-12-21 Robert Dewar <dewar@adacore.com> * err_vars.ads, a-cdlili.adb, a-cfdlli.ads, prj.adb, prj-nmsc.adb, a-cbdlli.adb, a-cbdlli.ads, a-cfdlli.adb: Minor reformatting. 2011-12-21 Vincent Pucci <pucci@adacore.com> * s-diflio.adb, s-diflio.ads, s-diinio.adb, s-diinio.ads, s-llflex.ads: Fix header. From-SVN: r182578
Diffstat (limited to 'gcc/ada/prj-nmsc.adb')
-rw-r--r--gcc/ada/prj-nmsc.adb7
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/ada/prj-nmsc.adb b/gcc/ada/prj-nmsc.adb
index af725de..b018026 100644
--- a/gcc/ada/prj-nmsc.adb
+++ b/gcc/ada/prj-nmsc.adb
@@ -1042,7 +1042,6 @@ package body Prj.Nmsc is
(Project : Project_Id;
Data : in out Tree_Processing_Data)
is
-
procedure Check_Not_Defined (Name : Name_Id);
-- Report an error if Var is defined
@@ -1065,6 +1064,8 @@ package body Prj.Nmsc is
end if;
end Check_Not_Defined;
+ -- Start of processing for Check_Not_Defined
+
begin
Check_Not_Defined (Snames.Name_Library_Dir);
Check_Not_Defined (Snames.Name_Library_Interface);
@@ -1116,9 +1117,9 @@ package body Prj.Nmsc is
Check_Configuration (Project, Data);
+ -- For aggregate project checks that no library attributes are defined
+
if Project.Qualifier = Aggregate then
- -- For aggregate project checks that no library attributes are
- -- defined.
Check_Aggregate (Project, Data);
else