3 ! PR fortran/88326 - ICE in gfc_conv_array_initializer
6 character, parameter :: x(3) = ['a','b','c']
7 character :: y(1) = transfer('', x
) ! { dg-error "Different shape for array assignment" }
8 character(0) :: z(1) = transfer('', x
) ! { dg-error "Different shape for array assignment" }
9 character :: u(0) = transfer('', x
)