https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66681
G. Steinmetz <gs...@t-online.de> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |gs...@t-online.de
--- Comment #12 from G. Steinmetz <gs...@t-online.de> ---
Update, with option -finit-local-zero or -finit-real :
$ cat pr66681.f90
complex a[*]
a = this_image()
end
$ cat z1.f90
program p
complex :: a[*]
a = 1.0
end
$ cat z2.f90
program p
real :: a[*]
a = 1.0
end
$ gfortran-9-20181125 -c pr66681.f90 -fcoarray=lib
$
$ gfortran-9-20181125 -c pr66681.f90 -fcoarray=lib -finit-local-zero
pr66681.f90:1:0:
1 | complex a[*]
|
internal compiler error: in fold_convert_loc, at fold-const.c:2426
0x960e24 fold_convert_loc(unsigned int, tree_node*, tree_node*)
../../gcc/fold-const.c:2425
0x725654 gfc_trans_scalar_assign(gfc_se*, gfc_se*, gfc_typespec, bool, bool,
bool)
../../gcc/fortran/trans-expr.c:9101
0x737c9d gfc_trans_assignment_1
../../gcc/fortran/trans-expr.c:10449
0x6e7c15 trans_code
../../gcc/fortran/trans.c:1837
0x71d18d gfc_generate_function_code(gfc_namespace*)
../../gcc/fortran/trans-decl.c:6509
0x69a8b6 translate_all_program_units
../../gcc/fortran/parse.c:6125
0x69a8b6 gfc_parse_file()
../../gcc/fortran/parse.c:6328
0x6e3eef gfc_be_parse_file
../../gcc/fortran/f95-lang.c:204
