gcc/testsuite/gfortran.dg/array_constructor_27.f03

   1 ! { dg-do compile }
   2 ! { dg-options "-std=gnu" }
   3
   4 ! PR fortran/36492
   5 ! Check for incorrect error message with -std=f2003.
   6 ! Reduced test triggering the ICE mentioned in comment #4, PR 36492.
   7
   8 implicit none
   9
  10 type t
  11   character (a) :: arr (1) = [ "a" ] ! { dg-error "Scalar INTEGER expression" }
  12 end type t
  13
  14 end