comp.lang.ada
 help / color / mirror / Atom feed
From: Pascal Obry <pascal@obry.net>
To: "Alex R. Mosteo" <devnull@mailinator.com>
Subject: Re: Deallocating records with task type fields.
Date: Mon, 12 Dec 2005 19:30:01 +0100
Date: 2005-12-12T19:30:03+01:00	[thread overview]
Message-ID: <439DC1A9.8010705@obry.net> (raw)
In-Reply-To: <439D5FE5.2030206@mailinator.com>

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

Pascal.

-- 

--|------------------------------------------------------
--| Pascal Obry                           Team-Ada Member
--| 45, rue Gabriel Peri - 78114 Magny Les Hameaux FRANCE
--|------------------------------------------------------
--|              http://www.obry.net
--| "The best way to travel is by means of imagination"
--|
--| gpg --keyserver wwwkeys.pgp.net --recv-key C1082595



  reply	other threads:[~2005-12-12 18:30 UTC|newest]

Thread overview: 11+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2005-12-09 22:49 Deallocating records with task type fields Gene
2005-12-10  7:16 ` Jeffrey R. Carter
2005-12-10 11:45   ` Simon Wright
2005-12-10 14:10 ` Dmitry A. Kazakov
2005-12-11  4:06   ` Gene
2005-12-11 11:50     ` Dmitry A. Kazakov
2005-12-12 11:32       ` Alex R. Mosteo
2005-12-12 18:30         ` Pascal Obry [this message]
2005-12-13 10:22           ` Alex R. Mosteo
2005-12-12 22:03     ` Randy Brukardt
2005-12-11  5:02   ` Gene
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox