Re: Ada.strings.bounded problems?

[ncohen@watson.ibm.com (Norman H. Cohen)]

In article <TARJEIJ.95Jan11183331@ulrik.uio.no>, tarjeij@ulrik.uio.no
(Tarjei Jensen) writes: 

|> How can anybody create generic string packages when there is an abundance of
|> bounded string types around and none are compatible? It looks like a mess to
|> me. I am used to think of (bounded) strings much like integers; they come in
|> different sizes, but are basically compatible.

Answer 1:  Base it on unbounded strings instead.

Answer 2: Use generic formal packages: 

   with Ada.Strings.Bounded;
   generic
      package Bounded_String_Instance is
         new Ada.Strings.Bounded.Generic_Bounded_Length (<>);
   package Generic_Additional_Bounded_String_Facilities is
      ...
   end Generic_Additional_Bounded_String_Facilities;


   Use of the package: 
   -------------------

   with Ada.Strings.Bounded;
   package Bounded_80 is new Ada.Strings.Bounded.Generic_Bounded_Length(80);

   with Bounded_80, Generic_Additional_Bounded_String_Facilities;
   pragma Elaborate (Generic_Additional_Bounded_String_Facilities);
   package Additional_Bounded_80_Facilities is
      new Generic_Additional_Bounded_String_Facilities (Bounded_80);

   with Bounded_80, Additional_Bounded_80_Facilities;
   procedure Client is
      ...
   end Client;

--
Norman H. Cohen    ncohen@watson.ibm.com