Ada Programming/Libraries/Container/Booch

Libraries Container Booch __TOC__ Library containers Bags Collections Plain Ordered Dequeues Graphs Directed Undirected Lists Single Double Maps Queues Plain Ordered Rings Sets Stacks Trees AVL Binary Multiway Library links Author Simon Wright Homepage http://booch95.sourceforge.net Tutorial http://booch95.sourceforge.net/case-study.html Project Info http://sourceforge.net/projects/booch95 CVS Archive http://sourceforge.net/cvs/?group_id=135616 Download http://sourceforge.net/project/showfiles.php?group_id=135616 Sample code Read the project tutorial for full detail. with Ada Calendar; with Ada Strings Bounded; package Cars is package Plate_Strings is new Ada.Strings.Bounded.Generic_Bounded_Length (10); subtype Plate_String is Plate_Strings.Bounded_String; package Model_Strings is new Ada.Strings.Bounded.Generic_Bounded_Length (32); subtype Model_String is Model_Strings.Bounded_String; type Car is record Plate : Plate_String; Model : Model_String; Registered : Ada.Calendar.Time; end record; end Cars; with BC.Containers.Collections.Bounded; with Cars; package My_Fleet_Combined is use type Cars.Car; package Abstract_Car_Containers is new BC.Containers (Cars.Car); package Abstract_Car_Collections is new Abstract_Car_Containers.Collections; package Fleets is new Abstract_Car_Collections.Bounded (Maximum_Size => 30); The_Fleet : Fleets.Collection; end My_Fleet_Combined; See also Wikibook Ada Programming Ada Programming/Libraries Ada Programming/Libraries/Container Booch