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.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,13c68a067434682
X-Google-Attributes: gid103376,public
From: mheaney@ni.net (Matthew Heaney)
Subject: Re: Task question
Date: 1997/10/07
Message-ID: <mheaney-ya023680000710970042090001@news.ni.net>#1/1
X-Deja-AN: 278369495
References: <3439D647.7C43@home.com>
Organization: Estormza Software
Newsgroups: comp.lang.ada
Date: 1997-10-07T00:00:00+00:00
List-Id: <comp.lang.ada>


In article <3439D647.7C43@home.com>, lmcoon@home.com wrote:

>I'm having a problem getting a task body to work
>the way I want it to.  Here's a contrived example
>showing (with illegal syntax) what I want to do:
>
>task body x is
>begin
>   loop
>      select
>         accept my_rendezvous (some_data: some_data_type) do
>            -- Rendezvous stuff
>         end my_rendezvous;
>      or
>         exit;  -- This is illegal
>      end select;
>   end loop;
>   -- Now do more stuff.
>end x;

task body x is
begin
   loop
      select
         accept my_rendezvous (some_data: some_data_type) do
            -- Rendezvous stuff
         end my_rendezvous;
      else
         exit;
      end select;
   end loop;
   -- Now do more stuff.
end x;

Just change the or to an else.

--------------------------------------------------------------------
Matthew Heaney
Software Development Consultant
<mailto:matthew_heaney@acm.org>
(818) 985-1271