]> git.ipfire.org Git - thirdparty/gcc.git/commit - gcc/fortran/array.cc
re PR fortran/44235 (array temporary with high upper bound)
authorThomas Koenig <tkoenig@gcc.gnu.org>
Mon, 9 Aug 2010 19:34:49 +0000 (19:34 +0000)
committerThomas Koenig <tkoenig@gcc.gnu.org>
Mon, 9 Aug 2010 19:34:49 +0000 (19:34 +0000)
commitee247636108baa13ae1f5322cb048d7c05a418cc
treee8a74351fdd3fd516d43ad305c53af81d3ee674d
parent1ddfdcf2df840ed6754d99630a3e1b7247ef9ead
re PR fortran/44235 (array temporary with high upper bound)

2010-08-09  Thomas Koenig  <tkoenig@gcc.gnu.org>

PR fortran/44235
* array.c (gfc_ref_dimen_size):  Add end argument.
If end is non-NULL, calculate it.
(ref_size):  Adjust call to gfc_ref_dimen_size.
(gfc_array_dimen_size):  Likewise.
(gfc_array_res_shape):  Likewise.
* gfortran.h:  Adjust prototype for gfc_ref_dimen_size.
* resolve.c (resolve_array_ref):  For stride not equal to -1,
fill in the lowest possible end.

2010-08-09  Thomas Koenig  <tkoenig@gcc.gnu.org>

PR fortran/44235
* gfortran.dg/dependency_32.f90:  New test.

From-SVN: r163041
gcc/fortran/ChangeLog
gcc/fortran/array.c
gcc/fortran/gfortran.h
gcc/fortran/resolve.c
gcc/fortran/simplify.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/dependency_32.f90 [new file with mode: 0644]