1 files changed, 8 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/gnat.dg/opt23_pkg.adb b/gcc-4.9/gcc/testsuite/gnat.dg/opt23_pkg.adb
new file mode 100644
index 000000000..8a647d507
--- /dev/null
+++ b/gcc-4.9/gcc/testsuite/gnat.dg/opt23_pkg.adb
@@ -0,0 +1,8 @@
+package body Opt23_Pkg is
+
+   function Get (R : Rec; I : Positive; M : Natural) return Path is
+   begin
+      return R.Val (I) (M);
+   end;
+
+end Opt23_Pkg;