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-cidlli.ads | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'gcc/ada/a-cidlli.ads') diff --git a/gcc/ada/a-cidlli.ads b/gcc/ada/a-cidlli.ads index 4cde43dd860..b1d4d166795 100644 --- a/gcc/ada/a-cidlli.ads +++ b/gcc/ada/a-cidlli.ads @@ -2,12 +2,11 @@ -- -- -- GNAT LIBRARY COMPONENTS -- -- -- --- A D A . C O N T A I N E R S . -- --- I N D E F I N I T E _ D O U B L Y _ L I N K E D _ L I S T S -- +-- ADA.CONTAINERS.INDEFINITE_DOUBLY_LINKED_LISTS -- -- -- -- S p e c -- -- -- --- Copyright (C) 2004-2007, Free Software Foundation, Inc. -- +-- Copyright (C) 2004-2008, Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -34,8 +33,8 @@ -- This unit was originally developed by Matthew J Heaney. -- ------------------------------------------------------------------------------ -with Ada.Finalization; -with Ada.Streams; +private with Ada.Finalization; +private with Ada.Streams; generic type Element_Type (<>) is private; @@ -223,8 +222,10 @@ private Lock : Natural := 0; end record; + overriding procedure Adjust (Container : in out List); + overriding procedure Finalize (Container : in out List) renames Clear; use Ada.Streams; -- cgit v1.2.1