diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2010-01-09 18:31:00 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2010-01-09 18:31:00 +0000 |
| commit | d5a8d70496b2617db76099153eb9984ca7f66294 (patch) | |
| tree | a6b7c3829a183a39905922538c3ef8f9d9996276 /gcc | |
| parent | f5fcb67a0b628bdb1a46b87b6bda635f3869a93f (diff) | |
| download | gcc-d5a8d70496b2617db76099153eb9984ca7f66294.zip gcc-d5a8d70496b2617db76099153eb9984ca7f66294.tar.gz gcc-d5a8d70496b2617db76099153eb9984ca7f66294.tar.bz2 | |
re PR fortran/32489 (Endless loop when compiling - middle-end?)
2010-01-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/32489
* gfortran.dg/array_constructor_33.f90: New test.
gfortran.dg/array_function_5.f90: Add credit.
From-SVN: r155772
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/array_constructor_33.f90 | 10 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/array_function_5.f90 | 1 |
3 files changed, 17 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 0b2c3a5..c2e9144 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2010-01-09 Jerry DeLisle <jvdelisle@gcc.gnu.org> + + PR fortran/32489 + * gfortran.dg/array_constructor_33.f90: New test. + gfortran.dg/array_function_5.f90: Add credit. + 2010-01-09 Alexandre Oliva <aoliva@redhat.com> PR debug/42631 diff --git a/gcc/testsuite/gfortran.dg/array_constructor_33.f90 b/gcc/testsuite/gfortran.dg/array_constructor_33.f90 new file mode 100644 index 0000000..7a7c6fa --- /dev/null +++ b/gcc/testsuite/gfortran.dg/array_constructor_33.f90 @@ -0,0 +1,10 @@ +! { dg-do compile } +! PR20923 gfortran slow for large array constructors. +! Test case prepared from PR by Jerry DeLisle <jvdelisle@gcc.gnu.org> +program sel + implicit none + integer(kind=4),parameter :: n=1000 + integer(kind=4) :: i,j + real(kind=4),dimension(n*n) :: vect + vect(:) = (/ ((( (i+j+3)),i=1,n),j=1,n) /) +end diff --git a/gcc/testsuite/gfortran.dg/array_function_5.f90 b/gcc/testsuite/gfortran.dg/array_function_5.f90 index da4873b..05f3c92 100644 --- a/gcc/testsuite/gfortran.dg/array_function_5.f90 +++ b/gcc/testsuite/gfortran.dg/array_function_5.f90 @@ -1,6 +1,7 @@ ! { dg-do run ) ! PR41278 internal compiler error related to matmul and transpose ! Test case prepared by Jerry DeLisle <jvdelisle@gcc.gnu.org> +! Original test case by Chris <cmklaij@hetnet.nl> program bug implicit none real, dimension(3,3) :: matA,matB,matC |