From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.5-pre1 (2020-06-20) on
	ip-172-31-74-118.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=3.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=ham autolearn_force=no version=3.4.5-pre1
X-Received: by 2002:a0c:9e0f:: with SMTP id p15mr5255485qve.27.1619787403260;
        Fri, 30 Apr 2021 05:56:43 -0700 (PDT)
X-Received: by 2002:a25:cf90:: with SMTP id f138mr6723666ybg.92.1619787402997;
 Fri, 30 Apr 2021 05:56:42 -0700 (PDT)
Path: eternal-september.org!reader02.eternal-september.org!goblin1!goblin3!goblin.stu.neva.ru!news.misty.com!border2.nntp.dca1.giganews.com!nntp.giganews.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Fri, 30 Apr 2021 05:56:42 -0700 (PDT)
In-Reply-To: <c0b85e97-e322-4706-a6ad-c5d5d2e3cc70n@googlegroups.com>
Injection-Info: google-groups.googlegroups.com; posting-host=94.31.102.170; posting-account=rmHyLAoAAADSQmMWJF0a_815Fdd96RDf
NNTP-Posting-Host: 94.31.102.170
References: <78fd99c3-538d-4981-af11-c1885df36575n@googlegroups.com>
 <7e2ece3d-893c-43fb-bf81-6002dbd0bc3dn@googlegroups.com> <e05ca45e-a201-43e7-8397-0b3f7089b2d0n@googlegroups.com>
 <56dc220e-1341-4a9f-98cc-132c8afdc2afn@googlegroups.com> <5990d990-d8fc-489c-bb5d-7f047e14e06an@googlegroups.com>
 <a1ac3062-0bdb-417a-98e5-8f82c74a5126n@googlegroups.com> <c0b85e97-e322-4706-a6ad-c5d5d2e3cc70n@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <076b95b5-ff44-4c47-9b0b-50d4546c589bn@googlegroups.com>
Subject: Re: [Ada95] Private non-generic children of generics not allowed
From: AdaMagica <christ-usch.grein@t-online.de>
Injection-Date: Fri, 30 Apr 2021 12:56:43 +0000
Content-Type: text/plain; charset="UTF-8"
Xref: reader02.eternal-september.org comp.lang.ada:61934
List-Id: <comp.lang.ada>

Vincent Marciante schrieb am Donnerstag, 29. April 2021 um 21:29:12 UTC+2:
>  but I'm not sure that 
> "implicit instantiation" would be the best way to describe it. I'll think about it.

It must be. As Gen.Priv, it has direct visibility to its parent Gen, as a private child also in its parent's private part.
When Gen is instantiated, say as Inst, Gen.Priv cannot have visibility into Inst. So the separate Proc must become

with Inst.Priv;
separate (Inst)
procedure Proc is
begin
...Priv.XXX... -- anything from Priv
end Proc;