aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/libgnat
diff options
context:
space:
mode:
authorSteve Baird <baird@adacore.com>2022-08-19 10:26:29 -0700
committerMarc Poulhiès <poulhies@adacore.com>2022-09-06 09:14:23 +0200
commitfc737a6c2001e303a3509df7b1125b8e3d7ea651 (patch)
tree32fb1d129ea06e250661b9f80b87d3e797691851 /gcc/ada/libgnat
parente60709b78248768fb6a36a2cabf713ece3887f86 (diff)
downloadgcc-fc737a6c2001e303a3509df7b1125b8e3d7ea651.zip
gcc-fc737a6c2001e303a3509df7b1125b8e3d7ea651.tar.gz
gcc-fc737a6c2001e303a3509df7b1125b8e3d7ea651.tar.bz2
[Ada] Restore missing Aggregate aspect for Ada.Containers.Ordered_Sets.Set
Ada RM A.18.9 includes a specification of the Aggregate aspect for the type Ada.Containers.Ordered_Sets. That aspect specification was deliberately commented out in a-coorse.ads at one time, but that workaround is no longer needed. gcc/ada/ * libgnat/a-coorse.ads: Restore Aggregate aspect specification for type Set.
Diffstat (limited to 'gcc/ada/libgnat')
-rw-r--r--gcc/ada/libgnat/a-coorse.ads6
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/libgnat/a-coorse.ads b/gcc/ada/libgnat/a-coorse.ads
index 8888a8c..fed41ec 100644
--- a/gcc/ada/libgnat/a-coorse.ads
+++ b/gcc/ada/libgnat/a-coorse.ads
@@ -57,9 +57,9 @@ is
type Set is tagged private
with Constant_Indexing => Constant_Reference,
Default_Iterator => Iterate,
- Iterator_Element => Element_Type;
- -- Aggregate => (Empty => Empty,
- -- Add_Unnamed => Include);
+ Iterator_Element => Element_Type,
+ Aggregate => (Empty => Empty,
+ Add_Unnamed => Include);
pragma Preelaborable_Initialization (Set);