https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85942
G. Steinmetz <gs...@t-online.de> changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |gs...@t-online.de --- Comment #4 from G. Steinmetz <gs...@t-online.de> --- One possible reduction : $ cat z1.f90 module m type t(a) private integer, len :: a = 1 end type end program p use m type(t(a=:)), allocatable :: z end $ gfortran-9-20180603 -c z1.f90 f951: internal compiler error: Segmentation fault 0xba15af crash_signal ../../gcc/toplev.c:325 0x693919 gfc_get_pdt_instance(gfc_actual_arglist*, gfc_symbol**, gfc_actual_arglist**) ../../gcc/fortran/decl.c:3473 0x699c71 gfc_match_decl_type_spec(gfc_typespec*, int) ../../gcc/fortran/decl.c:3990 0x69abbc gfc_match_data_decl() ../../gcc/fortran/decl.c:5808 0x6f6fb9 match_word_omp_simd ../../gcc/fortran/parse.c:93 0x6fa6ae match_word ../../gcc/fortran/parse.c:376 0x6fa6ae decode_statement ../../gcc/fortran/parse.c:376 0x6fc5d4 next_free ../../gcc/fortran/parse.c:1230 0x6fc5d4 next_statement ../../gcc/fortran/parse.c:1462 0x6fdecc parse_spec ../../gcc/fortran/parse.c:3854 0x7003b3 parse_progunit ../../gcc/fortran/parse.c:5667 0x701994 gfc_parse_file() ../../gcc/fortran/parse.c:6207 0x748c6f gfc_be_parse_file ../../gcc/fortran/f95-lang.c:204 Of course, compiles without "private"