diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-10-20 16:32:17 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-10-20 16:32:17 +0200 |
commit | bdafba6f354d0f34b464a9168c7eb152adbc2445 (patch) | |
tree | ed65d762a493384828cef0fc9627602ebaf63cda /gcc/ada/prj.ads | |
parent | a905304c94475f67c263b5f0012e3cda8feb41ca (diff) | |
download | gcc-bdafba6f354d0f34b464a9168c7eb152adbc2445.zip gcc-bdafba6f354d0f34b464a9168c7eb152adbc2445.tar.gz gcc-bdafba6f354d0f34b464a9168c7eb152adbc2445.tar.bz2 |
[multiple changes]
2014-10-20 Vincent Celier <celier@adacore.com>
* prj-attr.adb: New project level attribute Runtime.
* prj-conf.adb (Get_Project_Runtimes): New procedure to get
the attributes Runtime declared in the main project, to use
in auto-configuration.
(Get_Or_Create_Configuration_File): Call Get_Project_Runtimes.
* prj-proc.adb (Runtime_Defaults): New table to store
the default values of attributes Runtime (<language>).
(Set_Default_Runtime_For): New procedure to store the default
value of a Runtime (<language>) in table Runtime_Defaults.
(Expression): Use the value stored in table Runtime_Defaults as
the default for Runtime (<language>).
* prj-proc.ads (Set_Default_Runtime_For): New procedure.
* prj.ads (Attribute_Default_Value): New enumerated value
Runtime_Value.
2014-10-20 Ed Schonberg <schonberg@adacore.com>
* sem_ch3.adb (Analyze_Object_Declaration): If the type is
an unconstrained unchecked_union type, rewrite declaration
as a renaming to prevent attempt to retrieve non- existent
discriminants from expression.
2014-10-20 Ed Schonberg <schonberg@adacore.com>
* gnat_ugn.texi: Minor reformatting.
From-SVN: r216479
Diffstat (limited to 'gcc/ada/prj.ads')
-rw-r--r-- | gcc/ada/prj.ads | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/prj.ads b/gcc/ada/prj.ads index 1beff66..804d88a 100644 --- a/gcc/ada/prj.ads +++ b/gcc/ada/prj.ads @@ -77,7 +77,8 @@ package Prj is Empty_Value, -- Empty string or empty string list Dot_Value, -- "." or (".") Object_Dir_Value, -- 'Object_Dir - Target_Value); -- 'Target (special rules) + Target_Value, -- 'Target (special rules) + Runtime_Value); -- 'Runtime (special rules) -- Describe the default values of attributes that are referenced but not -- declared. |