gcc/testsuite/gnat.dg/anon3.ads - gcc - Git at Google

 package Anon3 is
    X : access Integer := new Integer;
    procedure Dummy;
 end Anon3;
	package Anon3 is
	X : access Integer := new Integer;
	procedure Dummy;
	end Anon3;