diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-10-08 10:51:09 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-10-08 10:51:09 +0000 |
| commit | 7717ea00902734bd90371e34af23d0b73287f875 (patch) | |
| tree | 60f102f8f0b02f960f1bcbd4b1514e0230d5465c /gcc/ada/snames.ads-tmpl | |
| parent | 7630a512e81ed887d2e13356955afc86854cd3d4 (diff) | |
| download | gcc-7717ea00902734bd90371e34af23d0b73287f875.tar.gz | |
2010-10-08 Robert Dewar <dewar@adacore.com>
* sem_ch6.adb: Minor reformatting.
2010-10-08 Robert Dewar <dewar@adacore.com>
* gnat1drv.adb: Add call to Validate_Independence.
* par-prag.adb: Add dummy entries for Independent,
Independent_Componentsa.
* sem_ch13.adb (Validate_Independence): New procedure
(Initialize): Initialize address clause and independence check tables
* sem_ch13.ads (Independence_Checks): New table
(Validate_Independence): New procedure
* sem_prag.adb: Add processing for pragma Independent[_Components]
* snames.ads-tmpl: Add entries for pragma Independent[_Components]
2010-10-08 Ed Schonberg <schonberg@adacore.com>
* sem_aggr.adb (Propagate_Discriminants): When expanding an aggregate
component with box initialization, if the component is a variant record
use the values of the discriminants to select the proper variant for
further box initialization.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@165162 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/snames.ads-tmpl')
| -rw-r--r-- | gcc/ada/snames.ads-tmpl | 20 |
1 files changed, 14 insertions, 6 deletions
diff --git a/gcc/ada/snames.ads-tmpl b/gcc/ada/snames.ads-tmpl index 2bb291ff35f..0c94966961e 100644 --- a/gcc/ada/snames.ads-tmpl +++ b/gcc/ada/snames.ads-tmpl @@ -312,9 +312,13 @@ package Snames is -- may be found in the appropriate section in unit Sem_Prag in file -- sem-prag.adb, and they are documented in the GNAT reference manual. - -- The entries marked Ada05 are Ada 2005 pragmas. They are implemented in - -- Ada 83 and Ada 95 mode as well, where they are technically considered to - -- be implementation dependent pragmas. + -- The entries marked Ada 05 are Ada 2005 pragmas. They are implemented + -- in Ada 83 and Ada 95 mode as well, where they are technically considered + -- to be implementation dependent pragmas. + + -- The entries marked Ada 12 are Ada 2012 pragmas. They are implemented + -- in Ada 83, Ada 95, and Ada 2005 mode as well, where they are technically + -- considered to be implementation dependent pragmas. -- The entries marked VMS are VMS specific pragmas that are recognized -- only in OpenVMS versions of GNAT. They are ignored in other versions @@ -407,7 +411,7 @@ package Snames is Name_All_Calls_Remote : constant Name_Id := N + $; Name_Annotate : constant Name_Id := N + $; -- GNAT - -- Note: AST_Entry is not in this list because its name matches -- VMS + -- Note: AST_Entry is not in this list because its name matches -- VMS -- the name of the corresponding attribute. However, it is -- included in the definition of the type Pragma_Id, and the -- functions Get_Pragma_Id and Is_Pragma_Id correctly recognize @@ -452,13 +456,15 @@ package Snames is Name_Import_Object : constant Name_Id := N + $; -- GNAT Name_Import_Procedure : constant Name_Id := N + $; -- GNAT Name_Import_Valued_Procedure : constant Name_Id := N + $; -- GNAT + Name_Independent : constant Name_Id := N + $; -- Ada 12 + Name_Independent_Components : constant Name_Id := N + $; -- Ada 12 Name_Inline : constant Name_Id := N + $; Name_Inline_Always : constant Name_Id := N + $; -- GNAT Name_Inline_Generic : constant Name_Id := N + $; -- GNAT Name_Inspection_Point : constant Name_Id := N + $; -- Note: Interface is not in this list because its name -- GNAT - -- matches an Ada 2005 keyword. However it is included in + -- matches an Ada 05 keyword. However it is included in -- the definition of the type Attribute_Id, and the functions -- Get_Pragma_Id and Is_Pragma_Id correctly recognize and -- process Name_Storage_Size. @@ -1172,7 +1178,7 @@ package Snames is Name_Unaligned_Valid : constant Name_Id := N + $; - -- Ada 2005 reserved words + -- Ada 05 reserved words First_2005_Reserved_Word : constant Name_Id := N + $; Name_Interface : constant Name_Id := N + $; @@ -1531,6 +1537,8 @@ package Snames is Pragma_Import_Object, Pragma_Import_Procedure, Pragma_Import_Valued_Procedure, + Pragma_Independent, + Pragma_Independent_Components, Pragma_Inline, Pragma_Inline_Always, Pragma_Inline_Generic, |