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,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 10.182.22.133 with SMTP id d5mr2962982obf.27.1389869016415;
 Thu, 16 Jan 2014 02:43:36 -0800 (PST)
X-Received: by 10.140.38.9 with SMTP id s9mr19369qgs.33.1389869016389; Thu, 16
 Jan 2014 02:43:36 -0800 (PST)
Path: 
 border1.nntp.dca3.giganews.com!backlog4.nntp.dca3.giganews.com!border4.nntp.dca.giganews.com!border2.nntp.dca.giganews.com!nntp.giganews.com!p15no17306442qaj.0!news-out.google.com!gg4ni5545qab.0!nntp.google.com!6no12940522qao.1!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Thu, 16 Jan 2014 02:43:36 -0800 (PST)
In-Reply-To: <wcctxd4hhpo.fsf@shell01.TheWorld.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=79.195.174.164;
 posting-account=rmHyLAoAAADSQmMWJF0a_815Fdd96RDf
NNTP-Posting-Host: 79.195.174.164
References: <839fee13-2743-49f6-a7f3-f95578386201@googlegroups.com>
 <lapsb1$k1l$1@loke.gir.dk>
 <b7ef903a-26f8-4cbc-b137-0f35fe5be406@googlegroups.com>
 <lb2bsl$phh$1@loke.gir.dk> <on1zhsdlciqw.70mg9osrtb80$.dlg@40tude.net>
 <lb4l5t$299$1@loke.gir.dk> <1aav8alqsnqqv.5urmifgwh1mv.dlg@40tude.net>
 <wcck3e18he0.fsf@shell01.TheWorld.com>
 <ea1e456e-0851-4df3-b06d-524dae3d0459@googlegroups.com>
 <wcc38kpgcui.fsf@shell01.TheWorld.com> <lb74ga$a2h$1@loke.gir.dk>
 <wcctxd4hhpo.fsf@shell01.TheWorld.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <b4e4b27c-81fd-43bd-bd80-1e82cd090587@googlegroups.com>
Subject: Re: 'Protected' abstract subprograms
From: AdaMagica <christ-usch.grein@t-online.de>
Injection-Date: Thu, 16 Jan 2014 10:43:36 +0000
Content-Type: text/plain; charset=ISO-8859-1
X-Original-Bytes: 2155
Xref: number.nntp.dca.giganews.com comp.lang.ada:184447
Date: 2014-01-16T02:43:36-08:00
List-Id: <comp.lang.ada>

On Thursday, January 16, 2014 1:51:31 AM UTC+1, Robert A Duff wrote:
> The only case I know of where the code in a package private part can affect the
> legality of code outside that package is this:
>
>     package Recursive_Types is
>
>        type T1 is private;
>
>        package Nested is
>           type T2 is private;
>        private
>           type T2 is record
>              X: T1;

I think this is illegal since it would freeze T1. Wouldn't it?

>           end record;
>        end Nested;
>
>     private
> 
>        type T1 is record