https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77325
Bug ID: 77325
Summary: ICE in gimplify_var_or_parm_decl, at gimplify.c:1933
Product: gcc
Version: 7.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
For versions down to at least 4.8 :
$ cat z1.f90
program p
character(1), parameter :: c(3) = ['a', 'b', 'c']
character(:), allocatable :: z(:)
z = c([1])
end
$ gfortran-7-20160821 z1.f90
z1.f90:4:0:
z = c([1])
internal compiler error: in gimplify_var_or_parm_decl, at gimplify.c:1933
0x9acaef gimplify_var_or_parm_decl
../../gcc/gimplify.c:1933
0x9b0dfc gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:10945
0x9af9c2 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:11232
0x9b9072 gimplify_compound_lval
../../gcc/gimplify.c:2210
0x9afbfa gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:10464
0x9c2bef gimplify_modify_expr
../../gcc/gimplify.c:4808
0x9b1a3a gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:10512
0x9b4d96 gimplify_stmt(tree_node**, gimple**)
../../gcc/gimplify.c:5804
0x9afd4b gimplify_statement_list
../../gcc/gimplify.c:1549
0x9afd4b gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:10929
0x9b4d96 gimplify_stmt(tree_node**, gimple**)
../../gcc/gimplify.c:5804
0x9b5fe5 gimplify_bind_expr
../../gcc/gimplify.c:1154
0x9b1ef5 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:10711
0x9b4d96 gimplify_stmt(tree_node**, gimple**)
../../gcc/gimplify.c:5804
0x9afd4b gimplify_statement_list
../../gcc/gimplify.c:1549
0x9afd4b gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:10929
0x9b4d96 gimplify_stmt(tree_node**, gimple**)
../../gcc/gimplify.c:5804
0x9b5fe5 gimplify_bind_expr
../../gcc/gimplify.c:1154
0x9b1ef5 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:10711
0x9b4d96 gimplify_stmt(tree_node**, gimple**)
../../gcc/gimplify.c:5804
