[Bug fortran/57117] New: ICE for sourced allocation of a UP entity that uses the transpose intrinsic

["Bader at lrz dot de" <gcc-bugzilla@gcc.gnu.org>]

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

             Bug #: 57117
           Summary: ICE for sourced allocation of a UP entity that uses
                    the transpose intrinsic
    Classification: Unclassified
           Product: gcc
           Version: 4.8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: Bader@lrz.de


Created attachment 29977
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=29977
module and main program as standalone source.

The attached source code causes a segfault in gfortran at compile time: 

intrinsics_02_pos.f90:61:0: internal compiler error: Segmentation fault
   allocate(y(3,3), source=transpose(x))
0x87e07f crash_signal             
        ../../gcc-4.8.0/gcc/toplev.c:332
0x5ad22b gfc_conv_scalarized_array_ref
        ../../gcc-4.8.0/gcc/fortran/trans-array.c:3037
0x5adb89 gfc_conv_array_ref(gfc_se*, gfc_array_ref*, gfc_symbol*, locus*)
        ../../gcc-4.8.0/gcc/fortran/trans-array.c:3172
0x5d0cdf gfc_conv_variable
        ../../gcc-4.8.0/gcc/fortran/trans-expr.c:1809
0x5cddaa gfc_conv_expr(gfc_se*, gfc_expr*)
        ../../gcc-4.8.0/gcc/fortran/trans-expr.c:6266
0x5e158c gfc_conv_intrinsic_function(gfc_se*, gfc_expr*)
        ../../gcc-4.8.0/gcc/fortran/trans-intrinsic.c:6697
0x5cd832 gfc_conv_function_expr
        ../../gcc-4.8.0/gcc/fortran/trans-expr.c:5547
0x5cdd1a gfc_conv_expr(gfc_se*, gfc_expr*)
        ../../gcc-4.8.0/gcc/fortran/trans-expr.c:6258
0x5d1d05 gfc_conv_expr_reference(gfc_se*, gfc_expr*)
        ../../gcc-4.8.0/gcc/fortran/trans-expr.c:6387
0x5f30be gfc_trans_allocate(gfc_code*)
        ../../gcc-4.8.0/gcc/fortran/trans-stmt.c:4911
0x5a7647 trans_code
        ../../gcc-4.8.0/gcc/fortran/trans.c:1577
0x5c4be2 gfc_generate_function_code(gfc_namespace*)
        ../../gcc-4.8.0/gcc/fortran/trans-decl.c:5397
0x568880 translate_all_program_units
        ../../gcc-4.8.0/gcc/fortran/parse.c:4468
0x568880 gfc_parse_file()
        ../../gcc-4.8.0/gcc/fortran/parse.c:4682
0x5a3c25 gfc_be_parse_file
        ../../gcc-4.8.0/gcc/fortran/f95-lang.c:189