[Bug fortran/77351] New: ICE in remove_trim, at frontend-passes.c:1145

[gerhard.steinmetz.fortran@t-online.de]

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

            Bug ID: 77351
           Summary: ICE in remove_trim, at frontend-passes.c:1145
           Product: gcc
           Version: 7.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gerhard.steinmetz.fortran@t-online.de
  Target Milestone: ---

With invalid code, and configured with --enable-checking=yes :


$ cat z1.f90
program p
   integer :: z(4) = [1, 2, 3, 4]
   print *, any(shape(z) /= [4,1])
end


$ gfortran-7-20160821 -O2 z1.f90
z1.f90:3:16:

    print *, any(shape(z) /= [4,1])
                1
Error: Different shape for elemental binary operation at (1) on dimension 1 (1
and 2)
z1.f90:3:16:

    print *, any(shape(z) /= [4,1])
                1
Error: Array operands are incommensurate at (1)
f951: internal compiler error: Segmentation fault
0xc1b63f crash_signal
        ../../gcc/toplev.c:335
0x7b0491 remove_trim
        ../../gcc/fortran/frontend-passes.c:1145
0x7b0567 optimize_comparison
        ../../gcc/fortran/frontend-passes.c:1568
0x7b0d27 optimize_op
        ../../gcc/fortran/frontend-passes.c:1459
0x7b0d27 optimize_expr
        ../../gcc/fortran/frontend-passes.c:248
0x7b1df5 gfc_expr_walker(gfc_expr**, int (*)(gfc_expr**, int*, void*), void*)
        ../../gcc/fortran/frontend-passes.c:3284
0x7b20c5 gfc_expr_walker(gfc_expr**, int (*)(gfc_expr**, int*, void*), void*)
        ../../gcc/fortran/frontend-passes.c:3296
0x7b3514 gfc_code_walker(gfc_code**, int (*)(gfc_code**, int*, void*), int
(*)(gfc_expr**, int*, void*), void*)
        ../../gcc/fortran/frontend-passes.c:3677
0x7b358c gfc_code_walker(gfc_code**, int (*)(gfc_code**, int*, void*), int
(*)(gfc_expr**, int*, void*), void*)
        ../../gcc/fortran/frontend-passes.c:3685
0x7b4494 optimize_namespace
        ../../gcc/fortran/frontend-passes.c:1005
0x7b4650 gfc_run_passes(gfc_namespace*)
        ../../gcc/fortran/frontend-passes.c:132
0x6eee97 gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:15601
0x6da18a resolve_all_program_units
        ../../gcc/fortran/parse.c:5855
0x6da18a gfc_parse_file()
        ../../gcc/fortran/parse.c:6107
0x71c602 gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:198