[Ada] Expansion of discrete choices
authorHristian Kirtchev <kirtchev@adacore.com>
Thu, 24 May 2018 13:04:39 +0000 (13:04 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Thu, 24 May 2018 13:04:39 +0000 (13:04 +0000)
commitebea257ee1195ce196ed005a7ee3a4b9e84117fb
tree94986fe440f62a302f1b044bcd008b203214dcfa
parentd72099ebf764ad96452153de8a77ab52d4731e18
[Ada] Expansion of discrete choices

This patch does some minor bookkeeping to avoid a potential double expansion
of discrete choices where at least one of them is a subtype with predicates.
No change in behavior, no need for a test.

2018-05-24  Hristian Kirtchev  <kirtchev@adacore.com>

gcc/ada/

* exp_util.adb (Expand_Static_Predicates_In_Choices): Indicate that the
construct with discrete choices no longer contains a subtype with
predicates since the expansion already handled this case.

From-SVN: r260646
gcc/ada/ChangeLog
gcc/ada/exp_util.adb