Re: tasking with GNAT 3.14p on windows

["James S. Rogers" <jimmaureenrogers@worldnet.att.net>]

"James S. Rogers" <jimmaureenrogers@worldnet.att.net> wrote in message
news:W4Oha.35749$ja4.2291095@bgtnsc05-news.ops.worldnet.att.net...
> "Jano" <nono@celes.unizar.es> wrote in message
> news:MPG.18f18ac32e4a300d9896c8@News.CIS.DFN.DE...
> > James S. Rogers dice...
> > > "Bernd Specht" <Bernd.Specht@gmx.com> wrote in message
> > > news:Xns934E8C5D49EFBerndSpechtgmxcom@62.153.159.134...
> > > > Hi,
> > > >
> > > > I tried an example from "Barnes, 18.8", but it didn't work as
> expected.
> > > Any
> > > > ideas?
> > > >
> > > > with Text_IO; use Text_IO;
> > > >
> > > > procedure TaskTest is
> > > > begin
> > > >   select
> > > >     delay 3.0;
> > > >     put_line ("aborted");
> > > >   then abort
> > > >     loop
> > > >       null; -- modified
> > > >     end loop;
> > > >   end select;
> > > > end TaskTest;
> > > >
> > (...)
> > > The null command will reliably take less than 3.0 seconds to complete.
> >
> > It's inside of a neverending loop.
>
> And optimization will remove the loop, leaving a single null statement.

I tried asynchronous transfer of control using the free Aonix compiler.
It worked on my Windows 98 laptop.

Jim Rogers