https://gcc.gnu.org/bugzilla/show_bug.cgi?id=102595
--- Comment #4 from kargl at gcc dot gnu.org --- Comment on attachment 52053 --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=52053 patch This patch fixes the problem in the PR and addresses a few niggles I found as I poked gfortran. Some of those errors don't occur without this patch. program p complex, parameter :: x(0) = 2 ! complex :: x(0) = 2 ! { dg-error "more values than variables" } ! complex :: x(1) = 2 ! { dg-error "already is initialized" } ! complex :: x = 2 ! { dg-error "already is initialized" } ! complex :: x(1) ! Works (as expected?) ! complex :: x(0) ! { dg-error "more values than variables" } data x%re /3.0/ print *, x%re end
