diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-01-23 17:03:41 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-01-23 17:03:41 +0000 |
| commit | 04ae062f6892a9087c3dc5a72074a46db6196d47 (patch) | |
| tree | f698d9e3c90e8f644532770d9a43ebd40def33db /gcc/ada/aspects.ads | |
| parent | 69c9b6070858e7e5a52d601f37783d3d285597bb (diff) | |
| download | gcc-04ae062f6892a9087c3dc5a72074a46db6196d47.tar.gz | |
2014-01-23 Ed Schonberg <schonberg@adacore.com>
* exp_util.adb (Make_Invqriant_Call): If type of expression is
a private extension, get invariant from base type.
2014-01-23 Robert Dewar <dewar@adacore.com>
* sem_util.adb, sem_attr.adb: Minor reformatting.
2014-01-23 Robert Dewar <dewar@adacore.com>
* opt.adb (Save_Opt_Config_Switches): Save SPARK_Mode_Pragma
(Restore_Opt_Config_Switches): Restore SPARK_Mode_Pragma.
* sem.adb (Semantics): Remove save/restore of
SPARK_Mode[_Pragma]. Not needed since already done in
Save/Restore_Opt_Config_Switches.
2014-01-23 Robert Dewar <dewar@adacore.com>
* gnat_rm.texi, einfo.adb, einfo.ads, sem_prag.adb, gnat_ugn.texi,
freeze.adb, repinfo.adb, aspects.adb, aspects.ads, sem_ch13.adb:
Linker_Section enhancements.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@206992 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/aspects.ads')
| -rw-r--r-- | gcc/ada/aspects.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/aspects.ads b/gcc/ada/aspects.ads index c5d76320ee3..5b76f6a6562 100644 --- a/gcc/ada/aspects.ads +++ b/gcc/ada/aspects.ads @@ -103,6 +103,7 @@ package Aspects is Aspect_Invariant, -- GNAT Aspect_Iterator_Element, Aspect_Link_Name, + Aspect_Linker_Section, -- GNAT Aspect_Machine_Radix, Aspect_Object_Size, -- GNAT Aspect_Output, @@ -325,6 +326,7 @@ package Aspects is Aspect_Invariant => Expression, Aspect_Iterator_Element => Name, Aspect_Link_Name => Expression, + Aspect_Linker_Section => Expression, Aspect_Machine_Radix => Expression, Aspect_Object_Size => Expression, Aspect_Output => Name, @@ -420,6 +422,7 @@ package Aspects is Aspect_Invariant => Name_Invariant, Aspect_Iterator_Element => Name_Iterator_Element, Aspect_Link_Name => Name_Link_Name, + Aspect_Linker_Section => Name_Linker_Section, Aspect_Lock_Free => Name_Lock_Free, Aspect_Machine_Radix => Name_Machine_Radix, Aspect_No_Return => Name_No_Return, @@ -624,6 +627,7 @@ package Aspects is Aspect_Invariant => Always_Delay, Aspect_Iterator_Element => Always_Delay, Aspect_Link_Name => Always_Delay, + Aspect_Linker_Section => Always_Delay, Aspect_Lock_Free => Always_Delay, Aspect_No_Return => Always_Delay, Aspect_Output => Always_Delay, |