[patch, fortran] Fix PR 27470, multiple allocations of derived types

[Erik Edelmann]

On Wed, May 10, 2006 at 07:22:39PM +0200, Paul Thomas wrote:
> Erik,
> 
> >On Tue, May 09, 2006 at 11:34:04PM +0200, Thomas Koenig wrote:
> > 
> >
> >>Index: trans-array.c
> >>===================================================================
> >>--- trans-array.c	(revision 113660)
> >>+++ trans-array.c	(working copy)
> >>@@ -3068,13 +3068,25 @@ gfc_array_allocate (gfc_se * se, gfc_exp
> >>  gfc_expr **upper;
> >>  gfc_ref *ref;
> >>  int allocatable_array;
> >>+  int must_be_pointer;
> >>
> >>  ref = expr->ref;
> >>
> >>+  /* In Fortran 95, components can only contain pointers, so that,
> >>+     in ALLOCATE (foo%bar(2)), bar must be a ponter component.
> >>   
> >>
> >                                               ^^^^^^
> >pointer
> >
> >
> > 
> >
> I take it that is an OK from you?

Well, I think you can interprete it that way, yes.  At least I have no
further comments or objections.


        Erik