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 2002:a5d:9153:: with SMTP id y19mr1781586ioq.38.1557463566356;
        Thu, 09 May 2019 21:46:06 -0700 (PDT)
X-Received: by 2002:aca:b50b:: with SMTP id e11mr3964181oif.51.1557463566094;
 Thu, 09 May 2019 21:46:06 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!feeder.eternal-september.org!news.gegeweb.eu!gegeweb.org!fdn.fr!proxad.net!feeder1-2.proxad.net!209.85.166.216.MISMATCH!136no82378itk.0!news-out.google.com!v82ni79ita.0!nntp.google.com!b2no82120itd.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Thu, 9 May 2019 21:46:05 -0700 (PDT)
In-Reply-To: <82417f9e-295d-4368-91ec-e79ce5349193@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=136.163.203.6;
 posting-account=g0yTkgoAAADdZGEYyZahxGlO3EkjH0Wv
NNTP-Posting-Host: 136.163.203.6
References: <0ca05176-a819-4e9a-8c6c-3a0c1f32f964@googlegroups.com>
 <82417f9e-295d-4368-91ec-e79ce5349193@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <ed8dcda6-f8c1-41e4-8cfb-379e1d175e35@googlegroups.com>
Subject: Re: constructor in abstract tagged types
From: Petter Fryklund <petter.fryklund@atero.se>
Injection-Date: Fri, 10 May 2019 04:46:06 +0000
Content-Type: text/plain; charset="UTF-8"
Xref: reader01.eternal-september.org comp.lang.ada:56274
Date: 2019-05-09T21:46:05-07:00
List-Id: <comp.lang.ada>

Den torsdag 9 maj 2019 kl. 16:40:28 UTC+2 skrev AdaMagica:
> Am Mittwoch, 8. Mai 2019 20:37:25 UTC+2 schrieb Daniel:
> Dmitry's solution is the way to do it.
> 
> >   procedure F_forced_to_do_it is abstract;
> 
> This is not a primitive operation of Fathers.
> Declaring it abstract makes it uncallable. So why define it at all.
> 
> > package FATHERS.SONS is
> > procedure F_Forced_to_do_it;
> 
> This is not inherited, so does not override the abstract operation definied in Fathers.
> It's also not a primitive operation.
> 
> > end FATHERS.SONS;

Adding keyword overriding will generate compiler error:
overriding procedure F_Forced_to_do_it;

which helps.