[Ada] Crash when an exception handler is executed with -gnatdk
authorPiotr Trojanek <trojanek@adacore.com>
Wed, 6 May 2020 16:40:22 +0000 (18:40 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Mon, 6 Jul 2020 11:35:00 +0000 (07:35 -0400)
commita34da56b26df1db73c20d36ae753173999bd46da
tree7e1051eaaa915d7f8e38f983dca0803bbc409cd6
parent3e6bb105d309430c6a96caaa9c0693cad935a09a
[Ada] Crash when an exception handler is executed with -gnatdk

gcc/ada/

* sem_ch5.adb (Analyze_Loop_Parameter_Specification): Propagate
exception when switch -gnatdk is used and no previous errors are
present.
* sem_eval.adb (Compile_Time_Known_Value, Is_In_Range):
Likewise.
* sem_warn.adb (Operand_Has_Warnings_Suppressed): Likewise.
gcc/ada/sem_ch5.adb
gcc/ada/sem_eval.adb
gcc/ada/sem_warn.adb