[Bug fortran/61454] New: ICE in simplification of initialization expression with array

["fxcoudert at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>]

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

            Bug ID: 61454
           Summary: ICE in simplification of initialization expression
                    with array
           Product: gcc
           Version: 4.10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: fxcoudert at gcc dot gnu.org

The following code:

  integer :: i
  real, parameter :: arr2(2) = [ 1., 2. ]
  integer, parameter :: l = ceiling(sum(arr2))
  end

makes the compiler segfault in expr.c:gfc_check_init_expr(gfc_expr*). The
backtrace is as follows:

  * frame #0: f951`gfc_check_init_expr(gfc_expr*) + 56 at expr.c:1958
    frame #1: f951`gfc_check_init_expr(e=0x0000000141b1da90) + 1053
    frame #2: f951`gfc_reduce_init_expr(expr=0x0000000141b1da90) + 56 at
expr.c:2632
    frame #3: f951`gfc_match_init_expr(result=0x00007fff5fbff668) + 74 at
expr.c:2671
    frame #4: f951`gfc_match_data_decl() + 3471 at decl.c:2031