http://gcc.gnu.org/bugzilla/show_bug.cgi?id=48820
--- Comment #20 from Mikael Morin <mikael at gcc dot gnu.org> 2012-08-02 19:48:55 UTC --- Author: mikael Date: Thu Aug 2 19:48:50 2012 New Revision: 190098 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=190098 Log: 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. Added: trunk/gcc/testsuite/gfortran.dg/assumed_rank_bounds_1.f90 trunk/gcc/testsuite/gfortran.dg/assumed_rank_bounds_2.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/trans-array.c trunk/gcc/testsuite/ChangeLog