Fix ICE caused by union types comparing equal to structures.
authorFritz Reese <fritzoreese@gmail.com>
Fri, 30 Sep 2016 11:37:23 +0000 (11:37 +0000)
committerFritz Reese <foreese@gcc.gnu.org>
Fri, 30 Sep 2016 11:37:23 +0000 (11:37 +0000)
commit00074dd8e31adf8bd445e4af7ed27dda77985ab4
tree3521e5546753b47fbef1a3f3a00dd267561893de
parent26f391e8067e96e4fba7b531eda9fb80023f2fd2
Fix ICE caused by union types comparing equal to structures.

2016-09-30  Fritz Reese  <fritzoreese@gmail.com>

Fix ICE caused by union types comparing equal to structures.

PR fortran/77782
* gcc/fortran/interface.c (gfc_compare_derived_types): Use
gfc_compare_union_types to compare union types.

PR fortran/77782
* gcc/testsuite/gfortran.dg/dec_structure_16.f90: New testcase.

From-SVN: r240651
gcc/fortran/ChangeLog
gcc/fortran/interface.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/dec_structure_16.f90 [new file with mode: 0644]