gcc/testsuite/gfortran.dg/data_char_4.f90

   1 ! { dg-do compile }
   2 ! PR fortran/99205 - Out of memory with undefined character length
   3 ! { dg-options "-w" }
   4
   5 program p
   6   character(l) :: c(2) ! { dg-error "must have constant character length" }
   7   data c /'a', 'b'/    ! { dg-error "Non-constant character length" }
   8   common c
   9 end
  10
  11 ! { dg-error "cannot appear in the expression at" " " { target *-*-* } 6 }