[Bug fortran/29315] error passing an array derived from type element

["pault at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #4 from pault at gcc dot gnu dot org  2006-10-27 14:37 -------
I am sorry but I realised on looking at this again that the stride has nothing
to do with this one - the patch below regtests but has not been checked for
correct-in-all-cases logic.  Since the original was incorrect, give me a couple
more days to get home and give this some clear thought... or what goes for
clear thought.

Paul


Index: gcc/fortran/trans-expr.c
===================================================================
*** gcc/fortran/trans-expr.c    (revision 117860)
--- gcc/fortran/trans-expr.c    (working copy)
*************** is_aliased_array (gfc_expr * e)
*** 1840,1846 ****
        if (ref->type == REF_ARRAY)
        seen_array = true;

!       if (ref->next == NULL
            && ref->type != REF_ARRAY)
        return seen_array;
      }
--- 1845,1851 ----
        if (ref->type == REF_ARRAY)
        seen_array = true;

!       if (seen_array
            && ref->type != REF_ARRAY)
        return seen_array;
      }


-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |pault at gcc dot gnu dot org
                   |dot org                     |
             Status|NEW                         |ASSIGNED
   Last reconfirmed|2006-10-02 03:07:51         |2006-10-27 14:37:47
               date|                            |


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29315