-- { dg-do compile }

package body task_name is
   task body Task_Object is
   begin
      null;
   end Task_Object;
end;