2010-10-05 Emmanuel Briot <briot@adacore.com>

[pf3gnuchains/gcc-fork.git] / gcc / ada / prj-env.ads

diff --git a/gcc/ada/prj-env.ads b/gcc/ada/prj-env.ads
index d4e3eb5..17d5e48 100644 (file)
--- a/gcc/ada/prj-env.ads
+++ b/gcc/ada/prj-env.ads
@@ -188,6 +188,11 @@ package Prj.Env is
    --  been called, the value set by the last call to Set_Project_Path.
    --  The returned value must not be modified.
 
+   procedure Set_Path
+     (Self : in out Project_Search_Path; Path : String);
+   --  Override the value of the project path.
+   --  This also removes the implicit default search directories
+
    procedure Find_Project
      (Self               : in out Project_Search_Path;
       Project_File_Name  : String;
@@ -202,10 +207,6 @@ package Prj.Env is
    --  (.gpr) for the file name is optional.
    --  Returns No_Name if no such project was found.
 
-   function Deep_Copy (Self : Project_Search_Path) return Project_Search_Path;
-   --  Return a deep copy of Self. The result can be modified independently of
-   --  Self, and must be freed by the caller
-
 private
    package Projects_Paths is new GNAT.Dynamic_HTables.Simple_HTable
      (Header_Num => Header_Num,