Thanks a lot! I sent another bug report for this one.
Best regards,
Jean Vezina
> > integer,parameter::v(3)=(/3,1,2/)
> > real x(3)
> > data x(v)/4.,6.,2./
> > print *,x
> > end
> >
> > Is this valid ? This example is also rejected by many compilers.
>
> Looks perfectly valid to me.
>
> R534 requires "x(v)" to be a variable, which it is.
> The constraint at [61:34-35] requires "v" to be an initialization
> expression, which it is (since it is a constant).
>
> Cheers,
> --
> ...........................Malcolm Cohen, NAG Ltd., Oxford, U.K.
> ([log in to unmask])
>
|