[Ada] Hang on conditional expression as actual
authorJustin Squirek <squirek@adacore.com>
Wed, 13 May 2020 22:59:29 +0000 (18:59 -0400)
committerPierre-Marie de Rodat <derodat@adacore.com>
Tue, 7 Jul 2020 09:26:58 +0000 (05:26 -0400)
commit7bf53b1a612b1fe08d80d823981879486531ea11
treeafb0f3e1fe62ef36c7915ddc571806a368144550
parent1c4b5a795ad772b0d80d18757593808044b14e90
[Ada] Hang on conditional expression as actual

gcc/ada/

* exp_ch6.adb (Expand_Branch): Verify the original node is a
conditional expression before recursing further.
(Insert_Level_Assign): Transform assertion into an explicit
raise.
gcc/ada/exp_ch6.adb