[Bug fortran/54070] [4.8/4.9 Regression] Wrong code with allocatable deferred-length (array) function results

[rouson at stanford dot edu]

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

--- Comment #7 from Damian Rouson <rouson at stanford dot edu> ---
I assume the ICE below is related to this PR, but the  argument in this case is
an array. Should I generate a separate PR? 

$ cat parse_command_line.f90 
module parse_command_line
  implicit none
contains
  function get_keyword_values(default_values) result(actual_values)
    character(len=*), intent(in) :: default_values(:)
    character(len=:), allocatable :: actual_values(:)     
    actual_values=default_values
  end function 
end module

$ gfortran -c parse_command_line.f90 
parse_command_line.f90: In function 'get_keyword_values':
parse_command_line.f90:7:0: internal compiler error: in
gimplify_var_or_parm_decl, at gimplify.c:1721
     actual_values=default_values
 ^

parse_command_line.f90:7:0: internal compiler error: Abort trap: 6
gfortran: internal compiler error: Abort trap: 6 (program f951)
Abort trap: 6

$ gfortran --version
GNU Fortran (MacPorts gcc49 4.9-20140316_0) 4.9.0 20140316 (experimental)