Re: Selective accept in Ada tasking

["SteveD" <nospam_steved94@attbi.com>]

Please provide a complete sample program that illustrates the problem and is
ready to compile.  I tested your sample after adding a dozen lines of code
to turn it into a program that compiles it ran flawlessly on W2k compiled
with Gnat 3.15p.

SteveD

"Ivan Paniagua" <paniaguaivan@hotmail.com> wrote in message
news:c560b18f.0211270022.72569d49@posting.google.com...
> I'm a beginner and I have a problem. This code makes my CPU reach
> 100%:
>
> task body Man_Motor1 is
> begin
> while not Fin loop
> select
> accept Subir;
> null; -- Some actions
> or
> accept Bajar;
> null; -- Some actions
> or
> accept Parar;
> null; -- Some actions
> or
> terminate;
> end select;
> end loop;
> end Man_Motor1;
>
> I'm using GNAT 3.14 in a Windows XP platform. If I introduce a delay
> before de end loop all it's OK, but what I want is that the task keep
> sleeping till it has a call to an entry without consuming a lot of CPU
> time.
>
> Can anybody help me?
> Thank you very much.