Re: Zero length Objects

[Vinzent 'Gadget' Hoefler <nntp-2004-07@t-domaingrabbing.de>]

Frank J. Lhota wrote:

>If objects with negative storage size were supported, then I could declare
>
>    Slack : String ( 1 .. -2_147_483_645 );
>
>and get a big increase in available memory :)

There's an easier way which is already supported:

   One : String (1 .. 100_000);
   Two : String (1 .. 100_000);

   for Two'Address use One'Address;

And you've just halved your memory requirements.


Vin"Bye folks, and watch out for another lesson of 'How to shoot you
in the foot with Ada' next week in you favourite usenet channel."zent.