[Ada] Make the Has_Dynamic_Range_Check flag obsolete
authorEric Botcazou <ebotcazou@adacore.com>
Wed, 5 Feb 2020 17:02:03 +0000 (18:02 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 5 Jun 2020 12:17:51 +0000 (08:17 -0400)
commit32115be843e3d7bd344b1e899deee27aef9a3b65
treec1e21353c59aaa1abbf792e0e289ebba6579525b
parent0ad46f04488199557f2b407f8d10839ef5c6e604
[Ada] Make the Has_Dynamic_Range_Check flag obsolete

2020-06-05  Eric Botcazou  <ebotcazou@adacore.com>

gcc/ada/

* atree.adb (New_Copy): Clear Has_Dynamic_Range_Check on
subexpression nodes.
* checks.adb (Append_Range_Checks): Assert that the node
doesn't have the Has_Dynamic_Range_Check flag set.
(Insert_Range_Checks): Likewise.
* exp_ch3.adb (Expand_N_Subtype_Indication): Do not apply
range checks for a full type or object declaration.
* sem_ch3.ads: Move with and use clauses for Nlists to...
(Process_Range_Expr_In_Decl): Change default to No_List for
the Check_List parameter.
* sem_ch3.adb: ...here.
(Process_Range_Expr_In_Decl): Likewise.  When the insertion
node is a declaration, only insert on the list if is present
when the declaration involves discriminants, and only insert
on the node when there is no list otherwise.
gcc/ada/atree.adb
gcc/ada/checks.adb
gcc/ada/exp_ch3.adb
gcc/ada/sem_ch3.adb
gcc/ada/sem_ch3.ads