re PR fortran/81341 (trunk/gcc/fortran/class.c:313: redundant condition ?)

2017-07-09  Dominique d'Humieres  <dominiq@lps.ens.fr>

	PR fortran/81341
	* class.c (class_array_ref_detected): Remove a redundant
	condition.

From-SVN: r250083
This commit is contained in:
Dominique d'Humieres 2017-07-09 19:41:45 +02:00 committed by Dominique d'Humieres
parent b48cd47ebd
commit 4669526d7e
2 changed files with 6 additions and 1 deletions

View file

@ -1,3 +1,9 @@
2017-07-09 Dominique d'Humieres <dominiq@lps.ens.fr>
PR fortran/81341
* class.c (class_array_ref_detected): Remove a redundant
condition.
2017-07-06 Harald Anlauf <anlauf@gmx.de>
PR fortran/70071

View file

@ -310,7 +310,6 @@ class_array_ref_detected (gfc_ref *ref, bool *full_array)
else if (ref->next && ref->next->type == REF_ARRAY
&& !ref->next->next
&& ref->type == REF_COMPONENT
&& ref->next->type == REF_ARRAY
&& ref->next->u.ar.type != AR_ELEMENT)
{
with_data = true;