blob: fa5e0a0134af5952868be232326aae5a8c9ddb65 [file] [log] [blame]
! { 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 }