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
X-Received: by 10.98.42.75 with SMTP id q72mr57623859pfq.7.1451498848726;
        Wed, 30 Dec 2015 10:07:28 -0800 (PST)
X-Received: by 10.182.104.163 with SMTP id gf3mr547544obb.5.1451498848691;
 Wed, 30 Dec 2015 10:07:28 -0800 (PST)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!mx02.eternal-september.org!feeder.eternal-september.org!1.eu.feeder.erje.net!feeder.erje.net!2.us.feeder.erje.net!weretis.net!feeder6.news.weretis.net!news.glorb.com!mv3no23285431igc.0!news-out.google.com!l1ni7287igd.0!nntp.google.com!mv3no16527948igc.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Wed, 30 Dec 2015 10:07:28 -0800 (PST)
In-Reply-To: <192c4493-9c53-4e23-b9bd-e4c543738dbc@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=75.99.9.146;
 posting-account=s89PEgoAAABHs2ETFyOrCeTQVQJAfzKq
NNTP-Posting-Host: 75.99.9.146
References: <5be84c5a-9614-4ee2-ae85-beb962171a05@googlegroups.com>
 <192c4493-9c53-4e23-b9bd-e4c543738dbc@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <c63a98f4-1127-4e7d-852f-ad418a4a749f@googlegroups.com>
Subject: Re: Overriding puzzle
From: marciant@earthlink.net
Injection-Date: Wed, 30 Dec 2015 18:07:28 +0000
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
Xref: news.eternal-september.org comp.lang.ada:28936
Date: 2015-12-30T10:07:28-08:00
List-Id: <comp.lang.ada>

On Wednesday, December 30, 2015 at 10:10:16 AM UTC-5, Egil H H wrote:
> You need to make the call to Header dispatching.
> One way would be:
>=20
>    procedure New_Page(o: A) is=20
>     begin=20
>       Header(A'Class(o));=20
>     end;
>=20
> --=20
> ~egilhh

I do not think that that is it. I think that type custom should be declared=
 in a package like A is.  Even though the New_Page procedure for Custom is =
overriding the inherited one, it is not a "primitive" operation associated =
with the type unless it it within the same _package_ as the type.  The Cust=
om type and the overriding procedure are not in a package, they are in a pr=
ocedure!