https://gcc.gnu.org/bugzilla/show_bug.cgi?id=70864
Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de> changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |gerhard.steinmetz.fortran@t | |-online.de --- Comment #3 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de> --- Reduced and simplified a bit. $ cat pr70864_cm.f90 module m70864 type BoxArray contains procedure :: boxarray_assign generic :: assignment(=) => boxarray_assign end type type MultiFab type(BoxArray) :: ba end type contains subroutine boxarray_assign (dst, src) class(BoxArray), intent(inout) :: dst type (BoxArray), intent(in ) :: src end subroutine multifab_copy (mf1, mf2) type(MultiFab), intent(inout) :: mf1, mf2 mf2 = mf1 !! end end module $ gfortran-7-20161204 -c pr70864_cm.f90 pr70864_cm.f90:19:0: end module internal compiler error: in gfc_get_symbol_decl, at fortran/trans-decl.c:1477 0x75a352 gfc_get_symbol_decl(gfc_symbol*) ../../gcc/fortran/trans-decl.c:1477 0x75e5b7 generate_local_decl ../../gcc/fortran/trans-decl.c:5327 0x71825b do_traverse_symtree ../../gcc/fortran/symbol.c:3994 0x75f412 generate_local_vars ../../gcc/fortran/trans-decl.c:5527 0x75f412 gfc_generate_function_code(gfc_namespace*) ../../gcc/fortran/trans-decl.c:6206 0x7331f9 gfc_generate_module_code(gfc_namespace*) ../../gcc/fortran/trans.c:2164 0x6e72fd translate_all_program_units ../../gcc/fortran/parse.c:6025 0x6e72fd gfc_parse_file() ../../gcc/fortran/parse.c:6238 0x72b182 gfc_be_parse_file ../../gcc/fortran/f95-lang.c:202