9 lines
122 B
Ada
9 lines
122 B
Ada
|
-- { dg-do compile }
|
||
|
|
||
|
package body task_name is
|
||
|
task body Task_Object is
|
||
|
begin
|
||
|
null;
|
||
|
end Task_Object;
|
||
|
end;
|