diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-01-23 13:07:34 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-01-23 13:07:34 +0100 |
| commit | 9eb8d5b4e9cfb5771f333abe0bfdd9667e56537b (patch) | |
| tree | 690646e0d60ca67a7d2f7ac6694350a82e4ae18a /gcc/ada/sem.adb | |
| parent | f6b9f2ffc190054ca8f4dad110d85613964d2006 (diff) | |
| download | gcc-9eb8d5b4e9cfb5771f333abe0bfdd9667e56537b.zip gcc-9eb8d5b4e9cfb5771f333abe0bfdd9667e56537b.tar.gz gcc-9eb8d5b4e9cfb5771f333abe0bfdd9667e56537b.tar.bz2 | |
[multiple changes]
2017-01-23 Ed Schonberg <schonberg@adacore.com>
* par-ch4.adb (P_Aggregate_Or_Parent_Expr): Recognize delta
aggregate construct.
(P_Record_Or_Array_Component_Association): An array aggregate
can start with an Iterated_Component_Association.
* scng.adb: Modify error message on improper use of @ in earlier
versions of the language.
* sinfo.ads: New node kind N_Delta_Aggregate.
* sinfo.adb: An N_Delta_Aggregate has component associations and
an expression.
* sem_res.adb (Resolve): Call Resolve_Delta_Aggregate.
* sem_aggr.ads, sem_aggr.adb (Resolve_Iterated_Component_Association):
Create a new index for each one of the choices in the association,
to prevent spurious homonyms in the scope.
(Resolve_Delta_Aggregate): New.
* sem.adb: An N_Delta_Aggregate is analyzed like an aggregate.
* exp_util.adb (Insert_Actions): Take into account
N_Delta_Aggregate.
* exp_aggr.ads: New procedure Expand_N_Delta_Aggregate.
* exp_aggr.adb: New procedure Expand_N_Delta_Aggregate,
and local procedures Expand_Delta_Array_Aggregate and
expand_Delta_Record_Aggregate.
* sprint.adb: Handle N_Delta_Aggregate.
2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
* exp_ch11.adb (Expand_N_Exception_Declaration): Generate an
empty name when the exception declaration is subject to pragma
Discard_Names.
(Null_String): New routine.
2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
* par-ch9.adb (P_Protected_Definition): Parse
any optional and potentially illegal pragmas which appear in
a protected operation declaration list.
(P_Task_Items): Parse
any optional and potentially illegal pragmas which appear in a
task item list.
From-SVN: r244794
Diffstat (limited to 'gcc/ada/sem.adb')
| -rw-r--r-- | gcc/ada/sem.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/ada/sem.adb b/gcc/ada/sem.adb index 36b561e..bae89ad 100644 --- a/gcc/ada/sem.adb +++ b/gcc/ada/sem.adb @@ -196,6 +196,9 @@ package body Sem is when N_Delay_Relative_Statement => Analyze_Delay_Relative (N); + when N_Delta_Aggregate => + Analyze_Aggregate (N); + when N_Delay_Until_Statement => Analyze_Delay_Until (N); |