Hi Fritz, just out of curiosity: A structure typed can't be used for a class object? Like:
structure /T/ integer :: something end structure class(T), allocatable :: foo end When the above *is* allowed then I miss some CLASS_DATA (...) in the code. If not, everything is fine. - Andre On Thu, 29 Sep 2016 10:30:13 -0400 Fritz Reese <fritzore...@gmail.com> wrote: > ICE in [1] is due to failure to null-guard map components in > gfc_compare_union_types. Attached is [obvious] fix - will commit soon > without complaints. > > --- > Fritz Reese > > [1] https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77764 > > 2016-09-29 Fritz Reese <fritzore...@gmail.com> > > Fix ICE for maps with zero components. > > PR fortran/77764 > * gcc/fortran/interface.c (gfc_compare_union_types): Null-guard map > components. > > PR fortran/77764 > * gcc/testsuite/gfortran.dg/dec_union_8.f90: New testcase. -- Andre Vehreschild * Email: vehre ad gmx dot de
