gcc/testsuite/gnat.dg/task_name.adb - gcc - Git at Google

 -- { dg-do compile }

 package body task_name is
    task body Task_Object is
    begin
       null;
    end Task_Object;
 end;
	-- { dg-do compile }

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