diff options
Diffstat (limited to 'gcc/ada/expander.adb')
| -rw-r--r-- | gcc/ada/expander.adb | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/gcc/ada/expander.adb b/gcc/ada/expander.adb index 8243df2..e0483b7 100644 --- a/gcc/ada/expander.adb +++ b/gcc/ada/expander.adb @@ -274,6 +274,9 @@ package body Expander is when N_Generic_Instantiation => Expand_N_Generic_Instantiation (N); + when N_Goto_When_Statement => + Expand_N_Goto_When_Statement (N); + when N_Handled_Sequence_Of_Statements => Expand_N_Handled_Sequence_Of_Statements (N); @@ -421,6 +424,9 @@ package body Expander is when N_Raise_Statement => Expand_N_Raise_Statement (N); + when N_Raise_When_Statement => + Expand_N_Raise_When_Statement (N); + when N_Raise_Constraint_Error => Expand_N_Raise_Constraint_Error (N); @@ -442,6 +448,9 @@ package body Expander is when N_Requeue_Statement => Expand_N_Requeue_Statement (N); + when N_Return_When_Statement => + Expand_N_Return_When_Statement (N); + when N_Simple_Return_Statement => Expand_N_Simple_Return_Statement (N); |