aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/prj.ads
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2014-10-20 16:32:17 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2014-10-20 16:32:17 +0200
commitbdafba6f354d0f34b464a9168c7eb152adbc2445 (patch)
treeed65d762a493384828cef0fc9627602ebaf63cda /gcc/ada/prj.ads
parenta905304c94475f67c263b5f0012e3cda8feb41ca (diff)
downloadgcc-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.ads3
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.