[Ada] Add more node unions
authorRichard Kenner <kenner@adacore.com>
Wed, 11 Aug 2021 17:12:55 +0000 (13:12 -0400)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 1 Oct 2021 06:13:37 +0000 (06:13 +0000)
commit698425f5cc85ec83fa17ba08d6da0754ced198f7
tree999806de582a5407e117d367a67fa873bedeebee
parent8b1a5da38e00348dfc359ef8418de344356ef78e
[Ada] Add more node unions

gcc/ada/

* gen_il-gen-gen_nodes.adb (N_Alternative, N_Is_Case_Choice):
Add.
(N_Is_Exception_Choice, N_Is_Range): Likewise.
* gen_il-types.ads: Add above names.
* gen_il-gen.adb (Put_Union_Membership): Write both declarations
and definitions of union functions.
gcc/ada/gen_il-gen-gen_nodes.adb
gcc/ada/gen_il-gen.adb
gcc/ada/gen_il-types.ads