From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.5-pre1 (2020-06-20) on
	ip-172-31-74-118.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=3.0 tests=BAYES_00,MSGID_SHORT
	autolearn=no autolearn_force=no version=3.4.5-pre1
Date: 23 Sep 92 21:08:02 GMT
From: gvls1!aviary!dmarshal@louie.udel.edu  (Dave Marshall)
Subject: Re: conditional entry call ?
Message-ID: <1747@aviary.Stars.Reston.Unisys.COM>
List-Id: <comp.lang.ada>

In article <1992Sep22.232926.25966@cs.uno.edu>, shengru@cs.uno.edu (Shengru Tu)
 writes:
> But is the following code legal, where I put another entry call stmt in
> the position of "stmt":
> 	  ...
>           select
>                 T2.E2;
>           or
>                 T3.E3;
>           end select;
> 	  ...
>
That code is not legal.  I humbly offer the following substitute construct:

LRM 9.7.2 presents an example procedure SPIN to demonstrate select-else.
One could similarly do the following (although it's bogus, IMHO):

loop
   select
      T2.E2;
      exit;
   else
      select
         T3.E3;
         exit;
      else
         null;
      end select;
   end select;
end loop;

The moral:  If you find yourself compelled to implement a select-or construct,
maybe you should reevaluate the way you're doing things.  The code I have
presented is garbage, and it should be used only if absolutely necessary.
-- 
                                           Dave Marshall
                                           dmarshal@stars.reston.unisys.com