Re: Ada multi-threaded programs do not terminate under RedHat Linux

[Robert Spooner <rls19@psu.edu>]

Ruben,

With the addition of:

with Ada.Text_IO; use Ada.Text_IO;

at the beginning, it compiles and runs OK using the latest public 
version of GNAT on Win2K. I don't have a linux machine to try.

Bob

Ruben Stranders wrote:
> I'm a Ada newbie and I have to make a very simple program to
> demonstrate the use of multithreading in Ada. For that purpose, I
> created the following program.
> 
> ============================
> procedure test is
>         task type counter;
> 
>         task body counter is
>         i : integer :=0;
>         begin
>                 put_line("Start");
>                 while i < 10000 loop
>                         i := i + 1;
>                 end loop;
>                 put_line("Finish");
>         end;
> 
>         task1 : counter;
> 
> begin
>         put_line("Test");
> end;
> ============================
> 
> I've compiled it under RedHat Linux 9.0 with "gnatmake test.adb".
> Unfortunately, the resulting program doesn't terminate. Instead of the
> expected output:
> 
> Starting
> Finished
> Test
> 
> it only prints the first two lines. The body of the procedure "test"
> is never called. I've tried this with several other programs and on
> different machines (all with RedHat 9.0). Can anyone give me a
> pointer?
> 
> Regards,
> 
> Ruben

-- 
                             Robert L. Spooner
                      Registered Professional Engineer
                        Associate Research Engineer
                   Intelligent Control Systems Department

          Applied Research Laboratory        Phone: (814) 863-4120
          The Pennsylvania State University  FAX:   (814) 863-7841
          P. O. Box 30
          State College, PA 16804-0030       rls19@psu.edu