[Patch, fortran] PR20779 and PR20891 - allocation of STAT or specification variables in same call

[Steve Kargl]

On Mon, Sep 18, 2006 at 07:20:21PM +0200, Paul Thomas wrote:
> >
> >2006-09-17 Paul Thomas <pault@gcc.gnu.org>
> >
> >   PR fortran/20779
> >   PR fortran/20891
> >   * resolve.c (find_sym_in_expr): New function that returns true
> >   if a symbol is found in an expression.
> >   (resolve_allocate_expr): Check whether the STAT variable is
> >   itself allocated in the same statement.  Use the call above to
> >   check whether any of the allocated arrays are used in array
> >   specifications in the same statement.
> >
> >2006-09-17 Paul Thomas <pault@gcc.gnu.org>
> >
> >   PR fortran/20779
> >   PR fortran/20891
> >   * gfortran.dg/alloc_alloc_expr_1.f90: New test.
> >

Paul,

I think the patch is okay after you eliminate this little
chunk:

-  if (ref2->u.ar.type == AR_ELEMENT)
-    return SUCCESS;
+/*  if (ref2->u.ar.type == AR_ELEMENT)
+    return SUCCESS;*/


-- 
Steve