rt_gccstream/gcc/testsuite/gnat.dg/task_name.adb

-- { dg-do compile }

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