Lines Matching refs:array_ref
4540 gfc_ref *array_ref = NULL; variable
4544 array_ref = n->expr->ref;
4564 while (array_ref
4565 && (array_ref->type == REF_COMPONENT
4566 || (array_ref->type == REF_ARRAY
4567 && array_ref->next
4568 && (array_ref->next->type
4570 array_ref = array_ref->next;
4573 if (array_ref
4579 || array_ref->next
4580 || array_ref->type != REF_ARRAY)
4587 gfc_array_ref *ar = &array_ref->u.ar;