diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-03-18 11:49:51 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-03-18 11:49:51 +0000 |
commit | 0abe34f68d7504d5cdec0020582280d7a5f66c8a (patch) | |
tree | 1ed5b3d6514e4e0a6d24da7aa36359ac4f6a8f25 /gcc/ada/prj-nmsc.adb | |
parent | c1b50e6ed6803b02306094b9ce400e4eb9807021 (diff) | |
download | gcc-0abe34f68d7504d5cdec0020582280d7a5f66c8a.tar.gz |
2005-03-17 Vincent Celier <celier@adacore.com>
* make.adb (Insert_Project_Sources): Make sure the Q is always
initialized.
* prj-nmsc.adb (Check_Ada_Naming_Scheme_Validity): Check Naming against
the default for the tree, not the global default naming.
* prj-proc.adb (Recursive_Process): No need to put the default naming
in the project data, it's already there.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@96669 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/prj-nmsc.adb')
-rw-r--r-- | gcc/ada/prj-nmsc.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/prj-nmsc.adb b/gcc/ada/prj-nmsc.adb index c51fbd5efab..6c814a990fd 100644 --- a/gcc/ada/prj-nmsc.adb +++ b/gcc/ada/prj-nmsc.adb @@ -606,9 +606,9 @@ package body Prj.Nmsc is Naming : Naming_Data) is begin - -- Only check if we are not using the standard naming scheme + -- Only check if we are not using the Default naming scheme - if Naming /= Standard_Naming_Data then + if Naming /= In_Tree.Private_Part.Default_Naming then declare Dot_Replacement : constant String := Get_Name_String |