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=ham autolearn_force=no version=3.4.4
X-Google-Thread: a07f3367d7,cadf87a839d5869c
X-Google-Attributes: gida07f3367d7,public,usenet
X-Google-NewGroupId: yes
X-Google-Language: ENGLISH,UTF8
X-Received: by 10.180.109.111 with SMTP id hr15mr1641239wib.1.1368583201599;
        Tue, 14 May 2013 19:00:01 -0700 (PDT)
Path: 
 hg5ni110146wib.1!nntp.google.com!feeder1.cambriumusenet.nl!feed.tweaknews.nl!194.109.133.86.MISMATCH!newsfeed.xs4all.nl!newsfeed3.news.xs4all.nl!xs4all!border4.nntp.ams.giganews.com!border2.nntp.ams.giganews.com!border2.nntp.dca.giganews.com!nntp.giganews.com!newsfeed.news.ucla.edu!nrc-news.nrc.ca!News.Dal.Ca!news.litech.org!news.stack.nl!aioe.org!.POSTED!not-for-mail
From: =?utf-8?Q?Yannick_Duch=C3=AAne_=28Hibou57?=
 =?utf-8?Q?=29?=
 <yannick_duchene@yahoo.fr>
Newsgroups: comp.lang.ada
Subject: Re: Generic access type convention and aliasing
Date: Wed, 08 May 2013 13:28:25 +0200
Organization: Ada @ Home
Message-ID: <op.wwrjhnq0ule2fv@cardamome>
References: <op.wwmy7p00ule2fv@cardamome> <op.wwneq7xtule2fv@cardamome>
 <km9jg4$eue$1@munin.nbi.dk> <op.wwo9q8s2ule2fv@cardamome>
 <5a96b4f0-15d3-4fe2-9e9c-000f59b9c864@googlegroups.com>
 <op.wwp94yh5ule2fv@cardamome> <kmbq6m$mf7$1@loke.gir.dk>
 <op.wwqiolpeule2fv@cardamome>
NNTP-Posting-Host: 7OQr3E3VjE1ZKDv7Xqqyjg.user.speranza.aioe.org
Mime-Version: 1.0
X-Complaints-To: abuse@aioe.org
User-Agent: Opera Mail/12.15 (Linux)
X-Notice: Filtered by postfilter v. 0.8.2
Content-Type: text/plain; charset=utf-8; format=flowed; delsp=yes
Content-Transfer-Encoding: Quoted-Printable
Date: 2013-05-08T13:28:25+02:00
List-Id: <comp.lang.ada>

Le Wed, 08 May 2013 00:13:23 +0200, Yannick Duch=C3=AAne (Hibou57)  =

<yannick_duchene@yahoo.fr> a =C3=A9crit:

> I feel there is no way to solve it or I want too much, and I should st=
op  =

> searching and go with the storage specific access discriminant (so no =
 =

> implicit dereference), and use some kind of external static check. At =
 =

> least storage specific access type offers a tiny bit more protection  =

> than general access, [=E2=80=A6]

Not just =E2=80=9Ca tiny bit=E2=80=9D, rather enough finally: I may simp=
ly disallow the  =

use of any general access type and also disallow instantiation of this  =

pool specific access type outside of the package which declares it, and =
 =

that will be a job for AdaControl :) With that check made aside of the  =

compilation, I'm sure no copy of an access of this type is ever made, as=
 a  =

pool specific access type cannot be converted to another pool specific  =

access type, except if can be converted to a general access type, and  =

that's why I will disallow general access types (any way, won't need  =

this). With these two restrictions, I'm sure I can assert no copy is mad=
e,  =

except in the [generic] package which =E2=80=9Cown=E2=80=9D this type.

-- =

=E2=80=9CSyntactic sugar causes cancer of the semi-colons.=E2=80=9D [1]
=E2=80=9CStructured Programming supports the law of the excluded muddle.=
=E2=80=9D [1]
[1]: Epigrams on Programming =E2=80=94 Alan J. =E2=80=94 P. Yale Univers=
ity