* array.c (gfc_find_array_ref): Remove coarray-specific handling.
From-SVN: r180149
+2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
+
+ * array.c (gfc_find_array_ref): Remove coarray-specific handling.
+
2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
PR fortran/50420
for (ref = e->ref; ref; ref = ref->next)
if (ref->type == REF_ARRAY
- && (ref->u.ar.type == AR_FULL || ref->u.ar.type == AR_SECTION
- || (ref->u.ar.type == AR_ELEMENT && ref->u.ar.dimen == 0)))
+ && (ref->u.ar.type == AR_FULL || ref->u.ar.type == AR_SECTION))
break;
if (ref == NULL)