1------------------------------------------------------------------------------
2--                                                                          --
3--                         GNAT COMPILER COMPONENTS                         --
4--                                                                          --
5--                              P R J . E X T                               --
6--                                                                          --
7--                                 S p e c                                  --
8--                                                                          --
9--             Copyright (C) 2000-2003 Free Software Foundation, Inc.       --
10--                                                                          --
11-- GNAT is free software;  you can  redistribute it  and/or modify it under --
12-- terms of the  GNU General Public License as published  by the Free Soft- --
13-- ware  Foundation;  either version 2,  or (at your option) any later ver- --
14-- sion.  GNAT is distributed in the hope that it will be useful, but WITH- --
15-- OUT ANY WARRANTY;  without even the  implied warranty of MERCHANTABILITY --
16-- or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License --
17-- for  more details.  You should have  received  a copy of the GNU General --
18-- Public License  distributed with GNAT;  see file COPYING.  If not, write --
19-- to  the Free Software Foundation,  59 Temple Place - Suite 330,  Boston, --
20-- MA 02111-1307, USA.                                                      --
21--                                                                          --
22-- GNAT was originally developed  by the GNAT team at  New York University. --
23-- Extensive contributions were provided by Ada Core Technologies Inc.      --
24--                                                                          --
25------------------------------------------------------------------------------
26
27--  Subprograms to set, get and cache external references, to be used as
28--  External functions in project files.
29
30with Types; use Types;
31
32package Prj.Ext is
33
34   procedure Add
35     (External_Name : String;
36      Value         : String);
37   --  Add an external reference (or modify an existing one).
38
39   function Value_Of
40     (External_Name : Name_Id;
41      With_Default  : Name_Id := No_Name)
42      return          Name_Id;
43   --  Get the value of an external reference, and cache it for future uses.
44
45   function Check (Declaration : String) return Boolean;
46   --  Check that an external declaration <external>=<value> is correct.
47   --  If it is correct, the external reference is Added.
48
49   procedure Reset;
50   --  Clear the internal data structure that stores the external references
51   --  and free any allocated memory.
52
53end Prj.Ext;
54