[patch, fortran] Fix PR 46007, segfault with shape

[Tobias Burnus]

  On 10/21/2010 01:37 PM, Thomas Koenig wrote:
> this rather straightforward patch fixes PR 46007.
>
> Regression-tested on trunk.  OK for trunk?  Also OK for 4.5 after
> regression-testing there?

OK. Thanks for the patch!

Tobias

> 2010-10-21  Thomas Koenig<tkoenig@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<tkoenig@gcc.gnu.org>
>
> 	PR fortran/46007
> 	* gfortran.dg/shape_5.f90:  New test case.
>