diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-10-31 12:09:39 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-10-31 12:09:39 +0100 |
| commit | 2ef051289c77160d87d20f11c27d2ea53bf75861 (patch) | |
| tree | c7c83678b4ddedaab787251c216ef64bc3b333ec /gcc/ada/aspects.ads | |
| parent | 88f7d2d148c34dbf76f5cb4321ced56d5253a96f (diff) | |
| download | gcc-2ef051289c77160d87d20f11c27d2ea53bf75861.zip gcc-2ef051289c77160d87d20f11c27d2ea53bf75861.tar.gz gcc-2ef051289c77160d87d20f11c27d2ea53bf75861.tar.bz2 | |
[multiple changes]
2014-10-31 Eric Botcazou <ebotcazou@adacore.com>
* inline.adb (Check_And_Split_Unconstrained_Function): Do not
test for the presence of nested subprograms.
2014-10-31 Ed Schonberg <schonberg@adacore.com>
* aspects.ads, aspects.adb: Add aspect Default_Storage_Pool.
* sem_ch13.adb (Analyze_One_Aspect): Generate pragma for aspect
Default_Storage_Pool.
From-SVN: r216959
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 50bada0..3ca077c 100644 --- a/gcc/ada/aspects.ads +++ b/gcc/ada/aspects.ads @@ -88,6 +88,7 @@ package Aspects is Aspect_Default_Component_Value, Aspect_Default_Initial_Condition, -- GNAT Aspect_Default_Iterator, + Aspect_Default_Storage_Pool, Aspect_Default_Value, Aspect_Depends, -- GNAT Aspect_Dimension, -- GNAT @@ -314,6 +315,7 @@ package Aspects is Aspect_Default_Component_Value => Expression, Aspect_Default_Initial_Condition => Optional_Expression, Aspect_Default_Iterator => Name, + Aspect_Default_Storage_Pool => Expression, Aspect_Default_Value => Expression, Aspect_Depends => Expression, Aspect_Dimension => Expression, @@ -401,6 +403,7 @@ package Aspects is Aspect_Default_Component_Value => Name_Default_Component_Value, Aspect_Default_Initial_Condition => Name_Default_Initial_Condition, Aspect_Default_Iterator => Name_Default_Iterator, + Aspect_Default_Storage_Pool => Name_Default_Storage_Pool, Aspect_Default_Value => Name_Default_Value, Aspect_Depends => Name_Depends, Aspect_Dimension => Name_Dimension, @@ -616,6 +619,7 @@ package Aspects is Aspect_Constant_Indexing => Always_Delay, Aspect_CPU => Always_Delay, Aspect_Default_Iterator => Always_Delay, + Aspect_Default_Storage_Pool => Always_Delay, Aspect_Default_Value => Always_Delay, Aspect_Default_Component_Value => Always_Delay, Aspect_Discard_Names => Always_Delay, |