1 files changed, 15 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/gnat.dg/discr25_pkg.ads b/gcc-4.9/gcc/testsuite/gnat.dg/discr25_pkg.ads
new file mode 100644
index 000000000..c09634d8c
--- /dev/null
+++ b/gcc-4.9/gcc/testsuite/gnat.dg/discr25_pkg.ads
@@ -0,0 +1,15 @@
+generic
+
+  N : Natural;
+
+package Discr25_Pkg is
+
+  type T is private;
+
+  procedure Proc1 (Set : in out T);
+
+private
+  type Obj_T (Size_Max : Natural);
+  type T is access Obj_T;
+
+end Discr25_Pkg;