diff options
Diffstat (limited to 'gcc/ada/a-chtgop.ads')
| -rw-r--r-- | gcc/ada/a-chtgop.ads | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/gcc/ada/a-chtgop.ads b/gcc/ada/a-chtgop.ads index 9e0581093ed..1389e2fb03e 100644 --- a/gcc/ada/a-chtgop.ads +++ b/gcc/ada/a-chtgop.ads @@ -2,8 +2,7 @@ -- -- -- GNAT LIBRARY COMPONENTS -- -- -- --- A D A . C O N T A I N E R S . -- --- H A S H _ T A B L E S . G E N E R I C _ O P E R A T I O N S -- +-- ADA.CONTAINERS.HASH_TABLES.GENERIC_OPERATIONS -- -- -- -- S p e c -- -- -- @@ -165,11 +164,11 @@ package Ada.Containers.Hash_Tables.Generic_Operations is function New_Buckets (Length : Hash_Type) return Buckets_Access; pragma Inline (New_Buckets); - -- Allocate a new Buckets_Type array with bounds 0..Length-1. + -- Allocate a new Buckets_Type array with bounds 0..Length-1 procedure Free_Buckets (Buckets : in out Buckets_Access); pragma Inline (Free_Buckets); - -- Unchecked_Deallocate Buckets. + -- Unchecked_Deallocate Buckets -- Note: New_Buckets and Free_Buckets are needed because Buckets_Access has -- an empty pool. |