diff options
author | Piotr Trojanek <trojanek@adacore.com> | 2024-02-16 15:10:06 +0100 |
---|---|---|
committer | Marc Poulhiès <poulhies@adacore.com> | 2024-05-16 10:49:27 +0200 |
commit | 8b73cb99bbd02db85d213c7120dbaa366c360e45 (patch) | |
tree | ca4f473512bb71bb08db34970fc2675829ba3d01 | |
parent | 06078187797f077f0548c55ac8cb8eca4094f1c3 (diff) | |
download | gcc-8b73cb99bbd02db85d213c7120dbaa366c360e45.zip gcc-8b73cb99bbd02db85d213c7120dbaa366c360e45.tar.gz gcc-8b73cb99bbd02db85d213c7120dbaa366c360e45.tar.bz2 |
ada: Remove Aspect_Specifications field from N_Procedure_Specification
Sync Has_Aspect_Specifications_Flag with the actual flags in the AST.
Code cleanup; behavior is unaffected.
gcc/ada/
* gen_il-gen-gen_nodes.adb (N_Procedure_Specification): Remove
Aspect_Specifications field.
-rw-r--r-- | gcc/ada/gen_il-gen-gen_nodes.adb | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/gcc/ada/gen_il-gen-gen_nodes.adb b/gcc/ada/gen_il-gen-gen_nodes.adb index f3dc215..a7021dc 100644 --- a/gcc/ada/gen_il-gen-gen_nodes.adb +++ b/gcc/ada/gen_il-gen-gen_nodes.adb @@ -736,7 +736,6 @@ begin -- Gen_IL.Gen.Gen_Nodes Sy (Null_Present, Flag), Sy (Must_Override, Flag), Sy (Must_Not_Override, Flag), - Sy (Aspect_Specifications, List_Id, Default_No_List), Sm (Null_Statement, Node_Id))); Ab (N_Access_To_Subprogram_Definition, Node_Kind); |