12 lines
336 B
Ada
12 lines
336 B
Ada
procedure Main is
|
|
-- Create as many task objects as your program needs
|
|
begin
|
|
-- whatever logic is required in your Main procedure
|
|
if some_condition then
|
|
-- for each task created by the Main procedure
|
|
The_task.Stop;
|
|
-- end the Main procedure
|
|
return; -- actually, this is not needed
|
|
end if;
|
|
end Main;
|