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