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,FREEMAIL_FROM
	autolearn=ham autolearn_force=no version=3.4.4
X-Google-Thread: 103376,19ad05fdbf4e671f
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news2.google.com!proxad.net!fr.ip.ndsoftware.net!fu-berlin.de!uni-berlin.de!individual.net!not-for-mail
From: "Alex R. Mosteo" <devnull@mailinator.com>
Newsgroups: comp.lang.ada
Subject: Re: Deallocating records with task type fields.
Date: Tue, 13 Dec 2005 11:22:19 +0100
Message-ID: <439EA0DB.9090401@mailinator.com>
References: <1134168554.826805.70690@g49g2000cwa.googlegroups.com>
 <1vb61utj75dws.gjbmfyig7vzz.dlg@40tude.net>
 <1134274006.711602.173280@g43g2000cwa.googlegroups.com>
 <1bjubyn0kl3cr.1l53b31tl59vw.dlg@40tude.net>
 <439D5FE5.2030206@mailinator.com> <439DC1A9.8010705@obry.net>
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
X-Trace: individual.net 9fBvycmTya59Ekxne+a9qwFGxsoXYtrDk5B2+plwu+8oZBJwI=
User-Agent: Mozilla Thunderbird 1.0.7 (X11/20051013)
X-Accept-Language: en-us, en
In-Reply-To: <439DC1A9.8010705@obry.net>
Xref: g2news1.google.com comp.lang.ada:6861
Date: 2005-12-13T11:22:19+01:00
List-Id: <comp.lang.ada>

Pascal Obry wrote:
> Alex,
> 
> 
>>You need some kind of task manager who does something like:
>>
>>loop
>>   if T'Terminated then -- where T is some task access type
>>      Free (T); -- Where free is unchecked_deallocation instance
>>   end if;
>>   delay 0.1;
>>end loop;
> 
> 
> This is an infinite loop :) You probably meant something like:
> 
>   while not T'Terminated loop
>     delay 0.1;
>   end loop;
>   Free (T); -- Where free is unchecked_deallocation instance

Of course ;) I never find the Exits...