diff options
| author | Mikael Morin <mikael.morin@tele2.fr> | 2009-01-05 19:44:09 +0100 |
|---|---|---|
| committer | Mikael Morin <mikael@gcc.gnu.org> | 2009-01-05 18:44:09 +0000 |
| commit | 95b243af7b3ca95a7f15081e945f64bc85a5adbe (patch) | |
| tree | 765bc18f940feb69cf9892809894cd39f48e9f66 | |
| parent | 256149524afec00869c1a2af8f2ef8fe18d97a45 (diff) | |
| download | gcc-95b243af7b3ca95a7f15081e945f64bc85a5adbe.zip gcc-95b243af7b3ca95a7f15081e945f64bc85a5adbe.tar.gz gcc-95b243af7b3ca95a7f15081e945f64bc85a5adbe.tar.bz2 | |
re PR fortran/38669 (Array bounds violation for arguments of elemental subroutine)
2009-01-05 Mikael Morin <mikael.morin@tele2.fr>
PR fortran/38669
PR fortran/38726
* gfortran.dg/elemental_subroutine_7.f90:
Fix p values so that it can be used as vector subscript.
From-SVN: r143084
| -rw-r--r-- | gcc/testsuite/ChangeLog | 7 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/elemental_subroutine_7.f90 | 2 |
2 files changed, 8 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 38a3105..0d2c47c 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2009-01-05 Mikael Morin <mikael.morin@tele2.fr> + + PR fortran/38669 + PR fortran/38726 + * gfortran.dg/elemental_subroutine_7.f90: + Fix p values so that it can be used as vector subscript. + 2009-01-05 Jason Merrill <jason@redhat.com> * g++.dg/cpp0x/defaulted7.C: New test. diff --git a/gcc/testsuite/gfortran.dg/elemental_subroutine_7.f90 b/gcc/testsuite/gfortran.dg/elemental_subroutine_7.f90 index 20e0e0c..7c7875b 100644 --- a/gcc/testsuite/gfortran.dg/elemental_subroutine_7.f90 +++ b/gcc/testsuite/gfortran.dg/elemental_subroutine_7.f90 @@ -14,7 +14,7 @@ program gfcbu84_main jplev = 42 k_lev = 1 call random_number (r) - p = 20 * r - 10 + p = 41 * r + 1 allocate (q(jplev)) q = 0 |