Re: time-slicing

["David C. Hoos" <david.c.hoos.sr@ada95.com>]

Putting a delay statement (e.g. delay 0.02;)
after each Put_Line statement will cause the
task to yield the CPU for at least the specified time,
thereby interleaving the tasks' execution.

----- Original Message ----- 
From: "Jan Prazak" <janp9@gmx.net>
Newsgroups: comp.lang.ada
To: <comp.lang.ada@ada.eu.org>
Sent: Monday, July 15, 2002 6:25 AM
Subject: gnat: time-slicing


> Hello,
> 
> I have seen this example program in a tutorial:
> 
> ------------
> with Ada.Text_IO; use Ada.Text_IO;
> 
> procedure Task_Demo is
>   task A;
>   task body A is
>   begin
>     Put_Line("b");
>     Put_Line("b");
>   end A;
> begin
>   Put_Line("a");
>   Put_Line("a");
> end Task_Demo;
> ---------------
> 
> The output is:
> a
> a
> b
> b
> 
> But I want the output to be:
> 
> ab
> 
> ab
> 
> (the tutorial says that this is the output with enabled time-slicing)
> 
> I have tried to use -gnatT100, and -gnatT1, and pragma
> Time_Slice(0.000001) etc., but none of this works.
> I have gnat for Linux.
> 
> Jan
> 
> _______________________________________________
> comp.lang.ada mailing list
> comp.lang.ada@ada.eu.org
> http://ada.eu.org/mailman/listinfo/comp.lang.ada
>