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.4 required=5.0 tests=AC_FROM_MANY_DOTS,BAYES_00
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,92c39a3be0a7f17d
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2002-03-15 10:38:51 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!newsfeeds.belnet.be!news.belnet.be!psinet-eu-nl!psiuk-p4!uknet!psiuk-p3!uknet!psiuk-n!news.pace.co.uk!nh.pace.co.uk!not-for-mail
From: "Marin David Condic" <dont.bother.mcondic.auntie.spam@[acm.org>
Newsgroups: comp.lang.ada
Subject: Re: labeling (was: partitioning (was: Future))
Date: Thu, 14 Mar 2002 15:27:41 -0500
Organization: Posted on a server owned by Pace Micro Technology plc
Message-ID: <a6r141$7rc$1@nh.pace.co.uk>
References: <3C7B0B13.3080003@worldnet.att.net> <3C7D1C89.2000803@home.com>
 <mailman.1014918362.4599.comp.lang.ada@ada.eu.org>
 <3C7E7CAD.7070504@mail.com> <3C7FB9D2.D9C6E055@boeing.com>
 <3C81DF1F.9000503@mail.com> <a5tmpv$aek$1@msunews.cl.msu.edu>
 <3C83A112.6080302@mail.com> <3C84223C.A356F466@adaworks.com>
 <3C853A04.34826F39@despammed.com> <a63fda$er$1@nh.pace.co.uk>
 <a65gj5$n73$1@a1-hrz.uni-duisburg.de> <a65jhi$112$1@nh.pace.co.uk>
 <a6831k$3ls$1@a1-hrz.uni-duisburg.de> <a68599$8na$1@nh.pace.co.uk>
 <3C8D0D70.BB09F3DA@despammed.com> <a6jg6p$iec$1@nh.pace.co.uk>
 <3C8E3110.F36F2DC8@despammed.com> <a6lfgd$gj6$1@nh.pace.co.uk>
 <3C8F575D.61EE90A9@despammed.com>
 <mailman.1016110022.26058.comp.lang.ada@ada.eu.org>
 <3C90DD8A.21D57CD2@despammed.com>
NNTP-Posting-Host: dhcp-200-133.miami.pace.co.uk
X-Trace: nh.pace.co.uk 1016137665 8044 136.170.200.133 (14 Mar 2002 20:27:45
 GMT)
X-Complaints-To: newsmaster@news.cam.pace.co.uk
NNTP-Posting-Date: 14 Mar 2002 20:27:45 GMT
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4522.1200
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4522.1200
Xref: archiver1.google.com comp.lang.ada:21305
Date: 2002-03-14T20:27:45+00:00
List-Id: <comp.lang.ada>

This is not very orthogonal with the rest of Ada and is potentially quite
awkward since "case (Animal)..." is really an expression rather than an
identifier for a structure. It would be much more orthogonal to do something
like:

Animal: case (Some_Expression) is
...
end case Animal ;

That is consistent with the loop and block statements.

MDC
--
Marin David Condic
Senior Software Engineer
Pace Micro Technology Americas    www.pacemicro.com
Enabling the digital revolution
e-Mail:    marin.condic@pacemicro.com
Web:      http://www.mcondic.com/


"Wes Groleau" <wesgroleau@despammed.com> wrote in message
news:3C90DD8A.21D57CD2@despammed.com...
>
>
> > >    end case (Animal);
> >
> > What about:
> >
> >     end case Animal;
> >
> > with the same rules as for ending procedure/function?
>
> That was somebody's earlier proposal.  Someone had some reason
> for proposing adding the parens.  I might have been one or both
> somebodies--I can't remember.  I also don't remember the reason
> for using parentheses. (Yeah, I know the archives are available.)
>