Re: Substrings as argument to procedures/functions

["Randy Brukardt" <randy@rrsoftware.com>]

"Jeffrey R. Carter" <spam.jrcarter.not@spam.not.acm.org> wrote in message 
news:nejeuc$57d$1@dont-email.me...
> ... And it's possible to declare your own string types (ARM 3.6.3), so you 
> could declare
>
> type Str is array (Positive range <>) of Character;
>
> and do anything with it that you can do with String. This isn't very 
> useful, but a possibly useful example would be

Probably a better example is to remember that the range of Positive is 
implementation-defined, and that the language only requires the upper bound 
to be at least 32767. So if you need strings that have potentially more 
characters than that (to read an entire text file, for instance), and you 
want the code to be unconditionally portable (to steal someone else's line), 
you need to declare a type yourself (here, assuming that a million 
characters are enough):

     type Big_Natural is range 0 .. 1_000_000;
     subtype Big_Positive is Big_Natural range 1 .. Big_Natural'Last;
     type Big_String is array (Big_Positive range <>) of Character;

You can do almost anything you can do with a String with a Big_String (and 
you can convert a Big_String to a String so you can use Put_Line and the 
like), but the index type is guaranteed to support up to a million 
characters.

                                Randy.