http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46007
--- Comment #3 from Thomas Koenig <tkoenig at gcc dot gnu.org> 2010-10-21 12:25:23 UTC --- Author: tkoenig Date: Thu Oct 21 12:25:12 2010 New Revision: 165770 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=165770 Log: 2010-10-21 Thomas Koenig <tkoe...@gcc.gnu.org> PR fortran/46007 * m4/shape.m4 (shape_'rtype_kind`): Use variable for rank. Allocate return array if unallocated. * generated/shape_i4.c: Regenerated. * generated/shape_i8.c: Regenerated. * generated/shape_i16.c: Regenerated. 2010-10-21 Thomas Koenig <tkoe...@gcc.gnu.org> PR fortran/46007 * gfortran.dg/shape_5.f90: New test case. Added: trunk/gcc/testsuite/gfortran.dg/shape_5.f90 Modified: trunk/gcc/testsuite/ChangeLog trunk/libgfortran/ChangeLog trunk/libgfortran/generated/shape_i16.c trunk/libgfortran/generated/shape_i4.c trunk/libgfortran/generated/shape_i8.c trunk/libgfortran/m4/shape.m4