sem_ch11.adb (Analyze_Raise_xxx_Error): do not mark such nodes as not in ALFA.
authorYannick Moy <moy@adacore.com>
Wed, 3 Aug 2011 15:14:04 +0000 (15:14 +0000)
committerArnaud Charlet <charlet@gcc.gnu.org>
Wed, 3 Aug 2011 15:14:04 +0000 (17:14 +0200)
commit5e8c8e4457de992f8f7081f20aaf11778656d344
treed4940852674b8fa0e79a064ca50828cda92256d1
parent5ffe0bab81981655b009617fc7041a818fee1d89
sem_ch11.adb (Analyze_Raise_xxx_Error): do not mark such nodes as not in ALFA.

2011-08-03  Yannick Moy  <moy@adacore.com>

* sem_ch11.adb (Analyze_Raise_xxx_Error): do not mark such nodes as not
in ALFA. Instead, they are considered as assertions to prove.
* sem_ch4.adb (Analyze_Conditional_Expression): do not always mark such
nodes as not in ALFA. Instead, include conditional expressions in ALFA
if they have no ELSE part, or if they occur in pre- and postconditions,
where the Condition cannot have side-effects in ALFA
(Analyze_Membership_Op): do not mark such nodes as not in ALFA
(Analyze_Type_Conversion): do not always mark such nodes as not in ALFA.
Instead, include type conversion between scalar types in ALFA.
* sem_ch6.adb (Process_Formals): correctly mark a parameter in ALFA
if-and-only-if its type is in ALFA.

From-SVN: r177285
gcc/ada/ChangeLog
gcc/ada/sem_ch11.adb
gcc/ada/sem_ch4.adb
gcc/ada/sem_ch6.adb