https://gcc.gnu.org/bugzilla/show_bug.cgi?id=71880
Harald Anlauf <anlauf at gmx dot de> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |anlauf at gmx dot de
--- Comment #4 from Harald Anlauf <anlauf at gmx dot de> ---
For a minor variant with NULLified p I get an ICE with trunk:
program t
character(:), dimension(:), allocatable, target :: c
character(:), dimension(:), pointer :: p => NULL()
allocate(c(10),source='X')
p=>c
end program t
% gfc-trunk -c pr71880.f90
pr71880.f90:1:0:
program t
internal compiler error: in gfc_get_symbol_decl, at fortran/trans-decl.c:1738
0x838f263 gfc_get_symbol_decl(gfc_symbol*)
../../trunk/gcc/fortran/trans-decl.c:1738
0x838f9b7 generate_local_decl
../../trunk/gcc/fortran/trans-decl.c:5356
0x8341e23 do_traverse_symtree
../../trunk/gcc/fortran/symbol.c:3986
0x83934c8 generate_local_vars
../../trunk/gcc/fortran/trans-decl.c:5556
0x83934c8 gfc_generate_function_code(gfc_namespace*)
../../trunk/gcc/fortran/trans-decl.c:6220
0x8312713 translate_all_program_units
../../trunk/gcc/fortran/parse.c:6008
0x8312713 gfc_parse_file()
../../trunk/gcc/fortran/parse.c:6208
0x8357ea5 gfc_be_parse_file
../../trunk/gcc/fortran/f95-lang.c:202
