[Bug fortran/91564] New: [8/9/10 Regression] ICE in gimplify_expr, at gimplify.c:14147

[gs...@t-online.de]

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

            Bug ID: 91564
           Summary: [8/9/10 Regression] ICE in gimplify_expr, at
                    gimplify.c:14147
           Product: gcc
           Version: 10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gs...@t-online.de
  Target Milestone: ---

Affects gfortran-8 an higher, has changed before 20180525 :
(one argument more than the library-kill)


$ cat z1.f90
program p
   call kill (1, 2, 3)
end


$ gfortran-7 -c z1.f90
$
$ gfortran-10-20190825 -c z1.f90
z1.f90:2:0:

    2 |    call kill (1, 2, 3)
      |
internal compiler error: in gimplify_expr, at gimplify.c:14147
0x90827a gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:14147
0x9110e9 gimplify_modify_expr
        ../../gcc/gimplify.c:5747
0x906efd gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:13135
0x909c88 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6779
0x907b5b gimplify_statement_list
        ../../gcc/gimplify.c:1849
0x907b5b gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:13579
0x909c88 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6779
0x90a621 gimplify_bind_expr
        ../../gcc/gimplify.c:1417
0x907c1b gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:13336
0x909c88 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6779
0x90a621 gimplify_bind_expr
        ../../gcc/gimplify.c:1417
0x907c1b gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:13336
0x909c88 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6779
0x90b0ca gimplify_body(tree_node*, bool)
        ../../gcc/gimplify.c:14381
0x90b3b5 gimplify_function_tree(tree_node*)
        ../../gcc/gimplify.c:14525
0x7b9e37 cgraph_node::analyze()
        ../../gcc/cgraphunit.c:667
0x7bc7f7 analyze_functions
        ../../gcc/cgraphunit.c:1126
0x7bd152 symbol_table::finalize_compilation_unit()
        ../../gcc/cgraphunit.c:2840


$ gfortran-10-20190825-debug -c z1.f90
gimplification failed:
3 <integer_cst 0x7f4ae4bebf60 type <integer_type 0x7f4ae4c005e8
integer(kind=4)> constant 3>
z1.f90:2:0:

    2 |    call kill (1, 2, 3)
      |
internal compiler error: gimplification failed
0x9f2a81 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:14144
0xa05658 gimplify_modify_expr
        ../../gcc/gimplify.c:5747
#...