1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/g_tables.adb b/gcc/testsuite/gnat.dg/g_tables.adb
new file mode 100644
index 000000000..bdad37850
--- /dev/null
+++ b/gcc/testsuite/gnat.dg/g_tables.adb
@@ -0,0 +1,8 @@
+--  { dg-options "-gnatws" }
+
+package body G_Tables is
+   function Create (L : Natural) return Table is
+   begin
+      return T : Table (1 .. L);
+   end Create;
+end G_Tables;