gcc/testsuite/gnat.dg/limited_with3_pkg3.ads

   1 with Limited_With3;
   2 with Limited_With3_Pkg1;
   3
   4 package Limited_With3_Pkg3 is
   5
   6     package My_Q is new Limited_With3_Pkg1 (Limited_With3.T);
   7
   8     type TT is tagged record
   9        State : My_Q.Element_Access;
  10     end record;
  11
  12 end Limited_With3_Pkg3;