http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46007
--- Comment #4 from Thomas Koenig <tkoenig at gcc dot gnu.org> 2010-10-21 13:02:15 UTC --- Author: tkoenig Date: Thu Oct 21 13:02:09 2010 New Revision: 165773 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=165773 Log: 2010-10-21 Thomas Koenig <tkoe...@gcc.gnu.org> PR fortran/46007 Backport from trunk * 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 Backport from trunk * gfortran.dg/shape_5.f90: New test case. Added: branches/gcc-4_5-branch/gcc/testsuite/gfortran.dg/shape_5.f90 Modified: branches/gcc-4_5-branch/gcc/testsuite/ChangeLog branches/gcc-4_5-branch/libgfortran/ChangeLog branches/gcc-4_5-branch/libgfortran/generated/shape_i16.c branches/gcc-4_5-branch/libgfortran/generated/shape_i4.c branches/gcc-4_5-branch/libgfortran/generated/shape_i8.c branches/gcc-4_5-branch/libgfortran/m4/shape.m4