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: a07f3367d7,ea9fbf0f08e5af8a
X-Google-Attributes: gida07f3367d7,public,usenet
X-Google-NewGroupId: yes
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news4.google.com!feeder.news-service.com!news-transit.tcx.org.uk!aioe.org!news.tornevall.net!.POSTED!not-for-mail
From: Jeffrey Carter <spam.jrcarter.not@spam.not.acm.org>
Newsgroups: comp.lang.ada
Subject: Re: Delayed deallocation of non-terminated task in Gnat?
Date: Wed, 31 Aug 2011 14:16:48 -0700
Organization: TornevallNET - http://news.tornevall.net
Message-ID: <j3m8gl$l52$1@tornado.tornevall.net>
References: <31ba531d-fa8e-40f3-97bc-c9112b329fe2@14g2000prv.googlegroups.com>
 <1k4finucoux98.7be4jx6iy5kx$.dlg@40tude.net>
 <wccmxep30xh.fsf@shell01.TheWorld.com>
 <1upog8dc7hzkz$.wy4yj6fhgo40$.dlg@40tude.net>
 <wccr541cn8h.fsf@shell01.TheWorld.com>
NNTP-Posting-Host: 57d3822a8b0e57d6b9a631be51eafee8
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
X-Trace: ddc8d5c471c37e8fd5274e9a3243ee1e
X-Complaints-To: abuse@tornevall.net
User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US;
 rv:1.9.2.20) Gecko/20110805 Thunderbird/3.1.12
X-Complaints-Language: Spoken language is english or swedish - NOT ITALIAN,
 FRENCH, GERMAN OR ANY OTHER LANGUAGE!
In-Reply-To: <wccr541cn8h.fsf@shell01.TheWorld.com>
X-UserIDNumber: 1738
X-Validate-Post: 
 http://news.tornevall.net/validate.php?trace=ddc8d5c471c37e8fd5274e9a3243ee1e
X-Complaints-Italiano: Non abbiamo padronanza della lingua italiana - se
 mandate una email scrivete solo in Inglese, grazie
X-Posting-User: 0243687135df8c4b260dd4a9a93c79bd
Xref: g2news1.google.com comp.lang.ada:20803
Date: 2011-08-31T14:16:48-07:00
List-Id: <comp.lang.ada>

On 08/31/2011 01:58 PM, Robert A Duff wrote:
> "Dmitry A. Kazakov"<mailbox@dmitry-kazakov.de>  writes:
>
>> There is no rendezvous to multiple tasks or calls to multiple entry points
>> (of several protected objects).
>
> That was proposed for Ada 9X.

One can do

select
    Entry_Call_1;
then abort
    Entry_Call_2;
end select;

and

select
    Entry_Call_1;
then abort
    select
       Entry_Call_2;
    then abort
       Entry_Call_3;
    end select;
end select;

and so on forever, as far as I can tell. This has the effect of waiting for one 
of multiple entry calls.

-- 
Jeff Carter
"You a big nose have it."
Never Give a Sucker an Even Break
107