aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/prj-env.ads
diff options
context:
space:
mode:
authorEmmanuel Briot <briot@adacore.com>2009-06-25 09:00:52 +0000
committerArnaud Charlet <charlet@gcc.gnu.org>2009-06-25 11:00:52 +0200
commit1d24fc5e45ad67dd6b622e79e3d5b254e05613dc (patch)
tree4c88206f35556d7b538fc30d6ef08065a3ef9f42 /gcc/ada/prj-env.ads
parent8f2eeab7a7bf4562ba1ed32e51c879c756fb3193 (diff)
downloadgcc-1d24fc5e45ad67dd6b622e79e3d5b254e05613dc.zip
gcc-1d24fc5e45ad67dd6b622e79e3d5b254e05613dc.tar.gz
gcc-1d24fc5e45ad67dd6b622e79e3d5b254e05613dc.tar.bz2
fmap.ads, [...] (Source_Data.Get_Object): Field removed, since it can be computed efficiently from the other fields.
2009-06-25 Emmanuel Briot <briot@adacore.com> * fmap.ads, make.adb, prj.adb, prj.ads, prj-nmsc.adb, prj-env.adb, prj-env.ads (Source_Data.Get_Object): Field removed, since it can be computed efficiently from the other fields. (Object_To_Global_Archive): New subprogram (Create_Mapping): Remove unneeded call to Remove_Forbidden_File_Name. (Override_Kind): Fix handling of separates in Ada. (Create_Mapping_File): Remove duplicate code (Naming_Data.Implementation_Exception, Specification_Exception): field removed, since never used. (Naming_Data.Specs, .Bodies): field removed, since this is only used while processing the project and is not needed once the tree is in memory. This brings Naming_Data and Lang_Naming_Data closer (same content now, but different use still). From-SVN: r148934
Diffstat (limited to 'gcc/ada/prj-env.ads')
-rw-r--r--gcc/ada/prj-env.ads6
1 files changed, 1 insertions, 5 deletions
diff --git a/gcc/ada/prj-env.ads b/gcc/ada/prj-env.ads
index 34b77aa..a41df8c 100644
--- a/gcc/ada/prj-env.ads
+++ b/gcc/ada/prj-env.ads
@@ -41,17 +41,13 @@ package Prj.Env is
procedure Create_Mapping_File
(Project : Project_Id;
- Language : Name_Id := No_Name;
+ Language : Name_Id;
In_Tree : Project_Tree_Ref;
Name : out Path_Name_Type);
-- Create a temporary mapping file for project Project. For each source or
-- template of Language in the Project, put the mapping of its file
-- name and path name in this file.
--
- -- This function either looks at all the source files for the specified
- -- language in the project, or if Language is set to No_Name, at all
- -- units in the project.
- --
-- Implementation note: we pass a language name, not a language_index here,
-- since the latter would have to match exactly the index of that language
-- for the specified project, and that is not information available in