[Ada] Avoid building malformed component constraints
authorSteve Baird <baird@adacore.com>
Mon, 6 Dec 2021 21:42:51 +0000 (13:42 -0800)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 6 Jan 2022 17:11:36 +0000 (17:11 +0000)
commit5bad97d7445d679921e87bc0f94286c3ade02d27
treeca1164ecc16a470bfaa3f6c7f9b31b3eb3aaa5de
parentc60f23e13ecbc5a5b07adb7557f1da094246cb2a
[Ada] Avoid building malformed component constraints

gcc/ada/

* sem_util.adb (Build_Discriminant_Reference): In the unexpected
case where we previously would fail an assertion, we instead
revert to the old behavior.
gcc/ada/sem_util.adb