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=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: 103376,fba47412041a3607
X-Google-Attributes: gid103376,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news2.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newsfeed00.sul.t-online.de!t-online.de!news.buerger.net!nuzba.szn.dk!news.jacob-sparre.dk!pnx.dk!not-for-mail
From: "Randy Brukardt" <randy@rrsoftware.com>
Newsgroups: comp.lang.ada
Subject: Re: Differences with/without .all
Date: Mon, 17 Mar 2008 15:42:30 -0500
Organization: Jacob's private Usenet server
Message-ID: <frml4i$ng6$1@jacob-sparre.dk>
References: <647ktoF2acjggU1@mid.individual.net>
NNTP-Posting-Host: static-69-95-181-76.mad.choiceone.net
X-Trace: jacob-sparre.dk 1205786578 24070 69.95.181.76 (17 Mar 2008 20:42:58
 GMT)
X-Complaints-To: news@jacob-sparre.dk
NNTP-Posting-Date: Mon, 17 Mar 2008 20:42:58 +0000 (UTC)
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1914
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1914
Xref: g2news1.google.com comp.lang.ada:20450
Date: 2008-03-17T15:42:30-05:00
List-Id: <comp.lang.ada>

"Alex R. Mosteo" <devnull@mailinator.com> wrote in message
news:647ktoF2acjggU1@mid.individual.net...
> Hello people,
>
> Gnat is giving me an error depending on if I use the .all abbreviation or
not.
> I had the (unresearched) idea that there should be no differences besides
the
> aesthetic one[*], so I'm not sure if gnat's wrong or I'm (guess what ;) )
>
> One way or the other, I'd like to know the explanation. The particular
case
> that is giving me problems in GPL 2007 is:
>
> protected type Safe;
> type Safe_Access is access all Safe;
> function S return Safe_Access;
>
> S.Some_Procedure;
> --  This fails with
> --  Prefix of protected procedure or entry call must be variable
>
> S.all.Some_Procedure;
> --  This compiles and runs OK.
>
> Your judgment?

Looks like a bug to me. S.all is not a constant, and neither is
S(implicit.all). But S by itself is a constant. It's an easy mistake to
make, though, we used to have a very similar bug in Janus/Ada.

                         Randy.