procedure main is
	task type X is
 		entry myEntry(args);
 	end X;
	task body X is
	begin
		null;
	end X;
	
	task type Y;
	task body Y is
		myX : X;
	begin
		null;
	end Y;
	
	myY : Y;
	
	task Z;
	task body Z is
	begin
		Y.myX.myEntry(); --ERROR: no selector myX for Y type
	end Z;
begin
	null;
end main;