gcc-4.9/gcc/testsuite/gnat.dg/specs/renaming2.ads


1
2
3
4
5
6
7
8
9
10
11

-- { dg-do compile }

with Renaming2_Pkg1;

package Renaming2 is

  type T is null record;

  package Iter is new Renaming2_Pkg1.GP.Inner (T);

end Renaming2;