From 2ada93f30687cfcbfdaef6df0734e3910d5ae9f2 Mon Sep 17 00:00:00 2001 From: charlet Date: Mon, 24 Mar 2008 10:57:32 +0000 Subject: 2008-03-24 Robert Dewar * s-tpopsp-posix.adb, s-tpopsp-solaris.adb, s-tpopsp-posix-foreign.adb, s-tpopsp-lynxos.adb, s-tpopde-vms.ads, s-tpopde-vms.adb, s-tpopsp-vxworks.adb, s-casi16.adb, s-caun16.adb, s-inmaop.ads, s-tadeca.adb, s-tadeca.ads, s-tadert.adb, s-tadert.ads, s-tpinop.adb, s-tpinop.ads, s-tporft.adb, a-rbtgso.adb, a-crbtgo.ads, a-crbtgo.adb, a-crbtgk.ads, a-crbtgk.adb, a-ciorse.adb, a-cihama.ads, a-cihama.adb, a-cidlli.ads, a-cidlli.adb, a-chtgop.ads, a-chtgop.adb, a-cgcaso.ads, a-cgcaso.adb, a-cgaaso.adb, a-ciormu.adb, a-cihase.adb, a-swuwha.ads, a-rbtgso.ads, a-cgaaso.ads, a-cgaaso.ads, a-ciorma.adb, a-chtgke.ads, a-chtgke.adb, a-llfzti.ads, a-ztenau.adb, a-ztenau.ads, a-stzhas.ads, a-szbzha.ads, a-szbzha.adb, a-crdlli.ads, a-crdlli.ads, a-crdlli.adb, i-forbla-darwin.adb, i-forbla.ads, s-regexp.adb, a-nllrar.ads, a-nlrear.ads, a-nucoar.ads, a-nurear.ads, i-forlap.ads, s-gearop.adb, s-gearop.ads, s-gecobl.adb, s-gecobl.ads, s-gecola.adb, s-gecola.ads, s-gerebl.adb, s-gerela.ads, a-swuwha.adb, i-forbla-unimplemented.ads, double spaced if it fits on one line and otherwise single spaced. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@133476 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/a-chtgop.ads | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'gcc/ada/a-chtgop.ads') 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. -- cgit v1.2.1