FreeChainXenon/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

interface.c (compare_components): Fix typo in name check conditional.

Browse source 
2016-08-23  Fritz Reese  <fritzoreese@gmail.com>

	gcc/fortran/
	* interface.c (compare_components): Fix typo in name check conditional.

From-SVN: r239706
This commit is contained in:
Fritz Reese 2016-08-23 16:11:19 +00:00 • committed by Fritz Reese
parent e90a801017
commit a181ec0301
2 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gcc/fortran/ChangeLog
View file

@ -1,3 +1,7 @@
2016-08-23 Fritz Reese <fritzoreese@gmail.com>
* interface.c (compare_components): Fix typo in name check conditional.
2016-08-22 Steven G. Kargl <kargl@gcc.gnu.org>
Bud Davis <jmdavis@link.com>

2
gcc/fortran/interface.c
View file

@ -403,7 +403,7 @@ compare_components (gfc_component *cmp1, gfc_component *cmp2,
if ( (d1 && (d1->attr.flavor == FL_STRUCT || d1->attr.flavor == FL_UNION)
&& ISUPPER (cmp1->name[1]))
|| (d2 && (d2->attr.flavor == FL_STRUCT || d2->attr.flavor == FL_UNION)
&& ISUPPER (cmp1->name[1])))
&& ISUPPER (cmp2->name[1])))
anonymous = true;
if (!anonymous && strcmp (cmp1->name, cmp2->name) != 0)