aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEd Schonberg <schonberg@adacore.com>2020-05-07 10:07:17 -0400
committerPierre-Marie de Rodat <derodat@adacore.com>2020-07-06 07:35:07 -0400
commitbefc919fde5a26fe2bc564a13201f603aef951d0 (patch)
treed7e5c627b404cd175f679b85dc197d31a452baac
parentf0e6256fd399418047772ebc72d2025938f7ccd8 (diff)
downloadgcc-befc919fde5a26fe2bc564a13201f603aef951d0.zip
gcc-befc919fde5a26fe2bc564a13201f603aef951d0.tar.gz
gcc-befc919fde5a26fe2bc564a13201f603aef951d0.tar.bz2
[Ada] There is no Expressions field in N_Delta_Aggregate node
gcc/ada/ * sinfo.ads: Indicate that Field 1 of an N_Delta_Aggregate is unused. Previously it was erroneously labelled as holding an Expressions list, in analogy with other aggregate constructs, but there are no Expressions attached to this node syntactically or semantically.
-rw-r--r--gcc/ada/sinfo.ads2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sinfo.ads b/gcc/ada/sinfo.ads
index 401b38d..24149b6 100644
--- a/gcc/ada/sinfo.ads
+++ b/gcc/ada/sinfo.ads
@@ -11889,7 +11889,7 @@ package Sinfo is
5 => False), -- unused
N_Delta_Aggregate =>
- (1 => False, -- Expressions (List1-Sem)
+ (1 => False, -- Unused
2 => True, -- Component_Associations (List2)
3 => True, -- Expression (Node3)
4 => False, -- Unused