[Bug fortran/57978] f951: internal compiler error: Segmentation fault

[Joost.VandeVondele at mat dot ethz.ch]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=57978

--- Comment #6 from Joost VandeVondele <Joost.VandeVondele at mat dot ethz.ch> ---
Reduced testcase:

  subroutine Change_calendar (ts_arr, target_calendar)
    integer, dimension(1) :: NO_DAY = (/ 0 /), ONE_DAY = (/ 180 /)
    integer, allocatable  :: diffdays(:), diffdays_leap(:)
          allocate (diffdays, source=NO_DAY)
  end subroutine Change_calendar

for 4.8 gives a segfault, for 4.9 reports:

small.f90:4.20:

          allocate (diffdays, source=NO_DAY)
                    1
Error: Array specification required in ALLOCATE statement at (1)