fortran/
commit495b772b61debc16d8b0587787e8ecbdf4ebe2b3
authormikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 2 Aug 2012 19:48:50 +0000 (2 19:48 +0000)
committermikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 2 Aug 2012 19:48:50 +0000 (2 19:48 +0000)
tree5d2a87b55e2491858ef9c60a627013cbfe35796c
parentd2116dba8cb5f0c3bd06c41c97a4f6e094a0372f
fortran/
PR fortran/48820
* trans-array.c (gfc_conv_ss_startstride): Set the intrinsic
result's lower and upper bounds according to the rank.
(set_loop_bounds): Set the loop upper bound in the intrinsic case.

testsuite/
PR fortran/48820
* gfortran.dg/assumed_rank_bounds_1.f90:  New test.
* gfortran.dg/assumed_rank_bounds_2.f90:  New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@190098 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/trans-array.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/assumed_rank_bounds_1.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/assumed_rank_bounds_2.f90 [new file with mode: 0644]