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;
|