"Wes Groleau" <groleau@freeshell.org> wrote in message
news:MeOdnQj5zpBTqeGiU-KYuA@gbronline.com...
> I think this has already been proposed by someone else:
>
> Generalize the declaration of default values on types.
>
>    type Ant is range Min .. Max := (Min + Max ) / 2;
>
>    type Primary is (Blue, Yellow, Red) := Blue;
>
>    type List is array (Some_Discrete)
>              of Thing := <any legal aggregate or entity>;
>
> -- 
> Wes Groleau
> -----------
> I've been framed! ...
> http://www.useit.com/alertbox/9612.html
>

Yeah I believe I did see something like that before on this group :-)....and
I agree with it, I like this sytnax.

-- 
St�phane Richard
"Ada World" Webmaster
http://www.adaworld.com