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=-0.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD, FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4 Path: eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!news.eternal-september.org!feeder.eternal-september.org!aioe.org!.POSTED!not-for-mail From: Vratislav Podzimek Newsgroups: comp.lang.ada Subject: Re: Full view of limited extension? Date: Tue, 18 Oct 2016 07:30:07 +0000 (UTC) Organization: Aioe.org NNTP Server Message-ID: References: <121792c4-3f9d-4d89-8ac5-88375ffb1110@googlegroups.com> NNTP-Posting-Host: ONPcOm8flCRYsdvOmHwGzA.user.gioia.aioe.org Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-Complaints-To: abuse@aioe.org User-Agent: Pan/0.140 (Chocolate Salty Balls; GIT b8fc14e git.gnome.org/git/pan2) X-Notice: Filtered by postfilter v. 0.8.2 Xref: news.eternal-september.org comp.lang.ada:32107 Date: 2016-10-18T07:30:07+00:00 List-Id: On Mon, 17 Oct 2016 23:24:44 -0700, Maciej Sobczak wrote: > Consider file test.ads: > > with Ada.Finalization; > > package Test is > > type Parent is limited interface; > > type Child is limited new Parent with private; > > private > > type Child is > new Ada.Finalization.Limited_Controlled and Parent with record I : > Integer; > end record; > > end Test; > > The problem is (GNAT 5.4.0): > > $ gcc -c test.ads test.ads:11:04: full view of limited extension must be > explicitly limited > > The "limited" keyword is already everywhere, there are no more places to > put it. :-) Am I missing some dark language corners here? I believe you need to put another 'limited' to the private definition of the type 'Child' -- i.e. 'type Child is limited...'