blob: 76fbcfb470b6d5c1564f1f8bb672f155705a46fc [file] [log] [blame]
program p
integer :: i = 0
integer :: z(2)
data z /2*i/ ! { dg-error "must be a PARAMETER in DATA" }
end