1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/prefix1.adb b/gcc/testsuite/gnat.dg/prefix1.adb
new file mode 100644
index 000000000..70e11368e
--- /dev/null
+++ b/gcc/testsuite/gnat.dg/prefix1.adb
@@ -0,0 +1,8 @@
+package body prefix1 is
+   Counter : Integer := 2;
+   Table : Arr := (2, 4, 8, 16, 32, 64, 128, 256, 512, 1024);
+   function Func (Object : T) return Arr is
+   begin
+      return Table;
+   end; 
+end prefix1;