From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00
	autolearn=unavailable autolearn_force=no version=3.4.4
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!.POSTED!not-for-mail
From: "Jeffrey R. Carter" <spam.jrcarter.not@spam.not.acm.org>
Newsgroups: comp.lang.ada
Subject: Re: Ada Successor Language
Date: Mon, 25 Jun 2018 11:19:49 +0200
Organization: Also freenews.netfront.net; news.tornevall.net;
 news.eternal-september.org
Message-ID: <pgqc3l$sek$1@dont-email.me>
References: <5e86db65-84b9-4b5b-9aea-427a658b5ae7@googlegroups.com>
 <878t7u1cfm.fsf@nightsong.com>
 <c22391d4-94b6-4ed3-96c0-1e9a84c4a99c@googlegroups.com>
 <b1141508-e692-46f6-b536-4a72081dfb45@googlegroups.com>
 <foqeocF7l4fU1@mid.individual.net> <pg949k$jmv$1@dont-email.me>
 <foqjvhF8kskU1@mid.individual.net>
 <776f3645-ed0c-4118-9b4d-21660e3bba4b@googlegroups.com>
 <pg9bd9$eo9$1@gioia.aioe.org> <87602fbu2g.fsf@nightsong.com>
 <pgad3n$1sop$1@gioia.aioe.org> <87po0mziqt.fsf@nightsong.com>
 <pgbm5e$c1l$1@gioia.aioe.org> <87fu1izfgs.fsf@nightsong.com>
 <pgd1hq$ca2$1@gioia.aioe.org> <878t75nwad.fsf@adaheads.home>
 <pgqas8$mjm$1@dont-email.me>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: 8bit
Injection-Date: Mon, 25 Jun 2018 09:19:49 -0000 (UTC)
Injection-Info: reader02.eternal-september.org;
 posting-host="1d73e571d991afce58b98197a6094ff1";
	logging-data="29140"; mail-complaints-to="abuse@eternal-september.org";
	posting-account="U2FsdGVkX1/gezQOdwcG4CEHvSLr56VFezJUwGnEFqo="
User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:52.0) Gecko/20100101
 Thunderbird/52.8.0
Cancel-Lock: sha1:3ujpHBb7dfqOw+G2SprXuxk7er8=
In-Reply-To: <pgqas8$mjm$1@dont-email.me>
Content-Language: en-US
Xref: reader02.eternal-september.org comp.lang.ada:53294
Date: 2018-06-25T11:19:49+02:00
List-Id: <comp.lang.ada>

On 06/25/2018 10:58 AM, Alejandro R. Mosteo wrote:
> 
> procedure Blah is
> 
>      generic
>          type Something is private;
>      package Duh is
>          type Meh is new Something;
>      end Duh;
> 
>      type Oh is tagged null record;
> 
>      package Ouch is new Duh (Oh);
> 
> begin
>     null;
> end Blah;

Generics are fine and have no problems if you're smart enough to avoid 
programming by extension.

-- 
Jeff Carter
"Clear? Why, a 4-yr-old child could understand this
report. Run out and find me a 4-yr-old child. I can't
make head or tail out of it."
Duck Soup
94