diff options
Diffstat (limited to 'gcc-4.9/gcc/testsuite/gnat.dg/specs/renaming2_pkg1.ads')
-rw-r--r-- | gcc-4.9/gcc/testsuite/gnat.dg/specs/renaming2_pkg1.ads | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/gnat.dg/specs/renaming2_pkg1.ads b/gcc-4.9/gcc/testsuite/gnat.dg/specs/renaming2_pkg1.ads new file mode 100644 index 000000000..45d5436ff --- /dev/null +++ b/gcc-4.9/gcc/testsuite/gnat.dg/specs/renaming2_pkg1.ads @@ -0,0 +1,17 @@ +-- { dg-excess-errors "no code generated" } + +with Renaming2_Pkg2; +with Renaming2_Pkg3; +with Renaming2_Pkg4; + +package Renaming2_Pkg1 is + + package Impl is new + Renaming2_Pkg3 (Base_Index_T => Positive, Value_T => Renaming2_Pkg2.Root); + + use Impl; + + package GP is new + Renaming2_Pkg4 (Length_T => Impl.Length_T, Value_T => Renaming2_Pkg2.Root); + +end Renaming2_Pkg1; |