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: Simon Wright <simon@pushface.org>
Newsgroups: comp.lang.ada
Subject: Re: making a son benefit access ton an instanciation of a generic
 package required as a formal parameter to his father and instanciated by him
Date: Sun, 21 Jan 2018 17:39:38 +0000
Organization: A noiseless patient Spider
Message-ID: <lyinbv157p.fsf@pushface.org>
References: <193126c2-f171-43ed-8c7c-00570f1dd4d4@googlegroups.com>
	<lymv1719vh.fsf@pushface.org>
	<1eb1f57d-36fa-4bf0-8a40-5b32d71e5c28@googlegroups.com>
Mime-Version: 1.0
Content-Type: text/plain
Injection-Info: reader02.eternal-september.org;
 posting-host="459587e5fa20f1a7eeae94267930dd32";
	logging-data="21206"; mail-complaints-to="abuse@eternal-september.org";
	posting-account="U2FsdGVkX19ZD9EN07mfbozi0d8W++Y0J+D0cAVYiu4="
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/25.3 (darwin)
Cancel-Lock: sha1:96g3EZpqXf0qxLbUUZQAPt8kWgc=
	sha1:JYIW7dZBq9gUz9ZsSf/H0Y78ALs=
Xref: reader02.eternal-september.org comp.lang.ada:50038
Date: 2018-01-21T17:39:38+00:00
List-Id: <comp.lang.ada>

Mehdi Saada <00120260a@gmail.com> writes:

> Child package, right.
> Sorry, seems like I mixed things up a bit.

Easy enough to do when scrambling through this stuff!

> My setup is below, but I think it's already done, and I misunderstood
> from mispelling the exception ("zero_division" instead of
> "zero_denominator". Stupid me.
>
> with P1_G;
> generic
>    with package P1 is new P1_G(<>);
>    Max : Positive;
> package P2 is [...] end P2.
> package body P2_G is [...] end P2_G;
>
> generic
> package P2_G.Child is [...] end P2_G.Child; -- child package
> package body P2_G.Child
> [...] -- I wanted exceptions declared in P1_G (or P1, I dont know the
> details here) to be visible here, but it OBVIOUSLY already the case.

It would be P1.Exception_Name

> end P2_G.Child.