[Bug fortran/57117] [OOP] ICE for sourced allocation of a polymorphic entity using TRANSPOSE

[dominiq at lps dot ens.fr]

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



--- Comment #3 from Dominique d'Humieres <dominiq at lps dot ens.fr> 2013-04-30 
16:39:38 UTC ---

Reduced test for RESHAPE:



  implicit none



  type :: ti

  end type



  class(ti), allocatable :: x(:,:), z(:)



  allocate(z(9), source=reshape(x, (/ 9 /)))



end



pr57117_2.f90:8:0: internal compiler error: in gfc_conv_procedure_call, at

fortran/trans-expr.c:4902

   allocate(z(9), source=reshape(x, (/ 9 /)))