diff options
Diffstat (limited to 'gcc/testsuite/gnat.dg/g_tables.ads')
-rw-r--r-- | gcc/testsuite/gnat.dg/g_tables.ads | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/g_tables.ads b/gcc/testsuite/gnat.dg/g_tables.ads new file mode 100644 index 000000000..34126882a --- /dev/null +++ b/gcc/testsuite/gnat.dg/g_tables.ads @@ -0,0 +1,9 @@ +generic + type Component is private; +package G_Tables is + type Table (<>) is limited private; + + function Create (L : Natural) return Table; +private + type Table is array (Positive range <>) of Component; +end G_Tables; |