https://gcc.gnu.org/bugzilla/show_bug.cgi?id=87752
Bug ID: 87752
Summary: ICE in omp_add_variable, at gimplify.c:6776
Product: gcc
Version: 9.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to at least version 5 :
$ cat z1.f90
subroutine foo (n, u, v)
integer :: n
real, pointer :: u(:), v(:)
!$omp parallel do simd
do i = 1, n
u(:) = v(:)
end do
end
$ gfortran -9-20181021 -c z1.f90 -fopenmp -O3
$ gfortran -9-20181021 -c z1.f90 -fopenmp -Ofast
z1.f90:6:0:
6 | u(:) = v(:)
|
internal compiler error: Segmentation fault
0xb1c86f crash_signal
../../gcc/toplev.c:325
0x8f6510 omp_add_variable
../../gcc/gimplify.c:6776
0x8fd2ad gimplify_bind_expr
../../gcc/gimplify.c:1300
0x8fa41a gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:11805
0x8fc208 gimplify_stmt(tree_node**, gimple**)
../../gcc/gimplify.c:6614
0x8f96eb gimplify_statement_list
../../gcc/gimplify.c:1763
0x8f96eb gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:12033
0x8fc208 gimplify_stmt(tree_node**, gimple**)
../../gcc/gimplify.c:6614
0x907d2b gimplify_and_add(tree_node*, gimple**)
../../gcc/gimplify.c:441
0x907d2b gimplify_and_return_first
../../gcc/gimplify.c:453
0x907d2b gimplify_omp_for
../../gcc/gimplify.c:10400
0x8f940a gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:12091
0x8fc208 gimplify_stmt(tree_node**, gimple**)
../../gcc/gimplify.c:6614
0x8fcb61 gimplify_bind_expr
../../gcc/gimplify.c:1331
0x8fa41a gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:11805
0x8fc208 gimplify_stmt(tree_node**, gimple**)
../../gcc/gimplify.c:6614
0x907d2b gimplify_and_add(tree_node*, gimple**)
../../gcc/gimplify.c:441
0x907d2b gimplify_and_return_first
../../gcc/gimplify.c:453
0x907d2b gimplify_omp_for
../../gcc/gimplify.c:10400
0x8f940a gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
../../gcc/gimplify.c:12091
