exp_util.adb (Insert_Actions): Handle Iterated_Component_Association.
authorEd Schonberg <schonberg@adacore.com>
Fri, 13 Jan 2017 10:11:17 +0000 (10:11 +0000)
committerArnaud Charlet <charlet@gcc.gnu.org>
Fri, 13 Jan 2017 10:11:17 +0000 (11:11 +0100)
commita702c9b9eec3cf67dc205462c9d7ba5b6d62cdc8
tree0e1601684725cc6bbea28850d03387ce6dcc00bb
parent0acd830b7e91e5b2d0e20fd0f5770544fd5f16ab
exp_util.adb (Insert_Actions): Handle Iterated_Component_Association.

2017-01-13  Ed Schonberg  <schonberg@adacore.com>

* exp_util.adb (Insert_Actions): Handle Iterated_Component_Association.
* par-ch3.adb (P_Discrete_Choice_List): An
Iterated_Component_Association is an array aggregate component.
* par-ch4.adb (P_Iterated_Component_Association): New procedure.
(Is_Quantified_Expression): New function that performs a lookahead
to distinguish quantified expressions from iterated component
associations.
(P_Aggregate_Or_Paren_Expr): Recognize iterated component
associations.
(P_Unparen_Cond_Case_Quant_Expression, P_Primary): Ditto.
* sem.adb (Analyze): Handle Iterated_Component_Association.
* sem_aggr.adb (Resolve_Array_Aggregate): Dummy handling of iterated
component associations.
* sinfo.ads, sinfo.adb: Entries for for
N_Iterated_Component_Association and its fields.
* sprint.adb (Sprint_Node_Actual): Handle
N_Iterated_Component_Association.

From-SVN: r244403
gcc/ada/ChangeLog
gcc/ada/exp_util.adb
gcc/ada/par-ch3.adb
gcc/ada/par-ch4.adb
gcc/ada/sem.adb
gcc/ada/sem_aggr.adb
gcc/ada/sinfo.adb
gcc/ada/sinfo.ads
gcc/ada/sprint.adb