diff options
| author | Tobias Burnus <burnus@gcc.gnu.org> | 2008-07-18 15:17:49 +0200 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2008-07-18 15:17:49 +0200 |
| commit | 4b043b8de578105d61090e36662e4db18a78cdcc (patch) | |
| tree | 72c1ea2fd63cb81c0b632fd88ad45c32eb188750 | |
| parent | 766de78c77549a313c8cdd0c9ffd57f2bc68aa8a (diff) | |
| download | gcc-4b043b8de578105d61090e36662e4db18a78cdcc.zip gcc-4b043b8de578105d61090e36662e4db18a78cdcc.tar.gz gcc-4b043b8de578105d61090e36662e4db18a78cdcc.tar.bz2 | |
The new file gfortran.dg/array_4.f90 was missing from the commit 137910
2008-07-17 Tobias Burnus <burnus@net-b.de>
PR fortran/36824
* gfortran.dg/array_4.f90: New.
From-SVN: r137949
| -rw-r--r-- | gcc/testsuite/gfortran.dg/array_4.f90 | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/array_4.f90 b/gcc/testsuite/gfortran.dg/array_4.f90 new file mode 100644 index 0000000..869522a --- /dev/null +++ b/gcc/testsuite/gfortran.dg/array_4.f90 @@ -0,0 +1,12 @@ +! { dg-do compile } +! PR fortran/36824 +! +! Dimension of tgclist was not recognized as having constant bounds +! +program test +implicit none +integer, dimension( 3 ), parameter :: tgc = (/5, 6, 7 /) +type tgccomp + integer, dimension( tgc( 1 ) : tgc( 2 ) ) :: tgclist +end type tgccomp +end program |