-- Copyright 1994 Grady Booch -- Copyright 1998-2003 Simon Wright -- This package is free software; you can redistribute it and/or -- modify it under terms of the GNU General Public License as -- published by the Free Software Foundation; either version 2, or -- (at your option) any later version. This package is distributed in -- the hope that it will be useful, but WITHOUT ANY WARRANTY; without -- even the implied warranty of MERCHANTABILITY or FITNESS FOR A -- PARTICULAR PURPOSE. See the GNU General Public License for more -- details. You should have received a copy of the GNU General Public -- License distributed with this package; see file COPYING. If not, -- write to the Free Software Foundation, 59 Temple Place - Suite -- 330, Boston, MA 02111-1307, USA. -- $Id: collection_test_support.ads,v 1.6.2.3 2003/01/31 21:43:49 simon Exp $ with BC.Containers; with BC.Containers.Collections; with BC.Containers.Collections.Bounded; with BC.Containers.Collections.Dynamic; with BC.Containers.Collections.Unbounded; with BC.Containers.Collections.Unmanaged; with BC.Support.Standard_Storage; with Global_Heap; package Collection_Test_Support is package Containers is new BC.Containers (Item => Character); package Collections is new Containers.Collections; package CB is new Collections.Bounded (Maximum_Size => 100); package CD is new Collections.Dynamic (Storage => Global_Heap.Storage); package CU is new Collections.Unbounded (Storage => BC.Support.Standard_Storage.Pool); package CUM is new Collections.Unmanaged; end Collection_Test_Support;