[Ada] Disallow Predicate_Failure without predicate
authorBob Duff <duff@adacore.com>
Tue, 19 May 2020 13:23:21 +0000 (09:23 -0400)
committerPierre-Marie de Rodat <derodat@adacore.com>
Wed, 8 Jul 2020 14:55:52 +0000 (10:55 -0400)
commit6091c2e0fa1836c6607562d273a529db5535c3d8
treeb5bfe6beb62605b3d500194fd6091b415b1e48bd
parent64b15a17a15e1cf06894d4825dba25b94dc365ff
[Ada] Disallow Predicate_Failure without predicate

gcc/ada/

* sem_ch13.adb (Predicate_Failure): Check that the type has
predicates.  Remove the setting of Has_Delayed_Aspects and
Freeze_Node, because (if the code is legal) it should have
already been done by the predicate aspect.
gcc/ada/sem_ch13.adb