diff options
author | Arnaud Charlet <charlet@adacore.com> | 2008-05-26 15:16:39 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-05-26 17:16:39 +0200 |
commit | 4f2b873ae9c36c452d09744a6887694d911c5603 (patch) | |
tree | 6bfd203d43ff52ab95d8b8286a5df7612137ed81 | |
parent | c5ecf679d5d226fdf3c8b0dd5be89c5790247304 (diff) | |
download | gcc-4f2b873ae9c36c452d09744a6887694d911c5603.zip gcc-4f2b873ae9c36c452d09744a6887694d911c5603.tar.gz gcc-4f2b873ae9c36c452d09744a6887694d911c5603.tar.bz2 |
* gnat.dg/specs/array_no_def_init.ads: New test.
From-SVN: r135939
-rw-r--r-- | gcc/testsuite/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/testsuite/gnat.dg/specs/array_no_def_init.ads | 9 |
2 files changed, 13 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 5f0d17b..8a5e58f 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2008-05-26 Arnaud Charlet <charlet@adacore.com> + + * gnat.dg/specs/array_no_def_init.ads: New test. + 2008-05-26 Kai Tietz <kai.tietz@onevision.com> * gcc-c.torture/execute/pr36321.c: New. diff --git a/gcc/testsuite/gnat.dg/specs/array_no_def_init.ads b/gcc/testsuite/gnat.dg/specs/array_no_def_init.ads new file mode 100644 index 0000000..b7a024d --- /dev/null +++ b/gcc/testsuite/gnat.dg/specs/array_no_def_init.ads @@ -0,0 +1,9 @@ +-- { dg-do compile } + +pragma Restrictions (No_Default_Initialization); +package Array_No_Def_Init is + + type Int_Array is array (Natural range <>) of Integer; + IA : Int_Array (1 .. 10); + +end Array_No_Def_Init; |