[Bug fortran/84117] New: [8 Regression] ICE in gimplify_modify_expr, at gimplify.c:5798

[gscfq@t-online.de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=84117

            Bug ID: 84117
           Summary: [8 Regression] ICE in gimplify_modify_expr, at
                    gimplify.c:5798
           Product: gcc
           Version: 8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Changed recently between 20180107 and 20180114.
Affects testfile gcc/testsuite/gfortran.dg/pr71230-1.f90 (and others).


$ gfortran-8-20180107 -c pr71230-1.f90 -O3 -ftrapv
$ gfortran-7-20180125 -c pr71230-1.f90 -O3 -ftrapv
$
$ gfortran-8-20180128 -c pr71230-1.f90 -O3 -ftrapv
during GIMPLE pass: vect
f951: internal compiler error: in gimplify_modify_expr, at gimplify.c:5798
0x97e137 gimplify_modify_expr
        ../../gcc/gimplify.c:5797
0x974a4b gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:11435
0x976d76 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6658
0x97947e gimplify_cond_expr
        ../../gcc/gimplify.c:4128
0x974a81 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:11391
0x976d76 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6658
0x9791e5 gimplify_cond_expr
        ../../gcc/gimplify.c:4025
0x974a81 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:11391
0x973b0b gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:12160
0x974ecc gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:12098
0x973aec gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:12158
0x973aec gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:12158
0x973aec gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:12158
0x983e71 force_gimple_operand_1(tree_node*, gimple**, bool (*)(tree_node*),
tree_node*)
        ../../gcc/gimplify-me.c:78
0xd9ea3a vect_loop_versioning(_loop_vec_info*, unsigned int, bool, poly_int<1u,
unsigned long>)
        ../../gcc/tree-vect-loop-manip.c:3018
0xd8a83a vect_transform_loop(_loop_vec_info*)
        ../../gcc/tree-vect-loop.c:8607
0xdaf084 vectorize_loops()
        ../../gcc/tree-vectorizer.c:740