Print

Print


Malcolm Cohen wrote:
> John Reid said:
>
>>Jean Vezina wrote:
>>
>>>To all:
>>>
>>>Before sending a bug report, I would like to know if the following
>>>example is standard conforming (Fortran 95):
>>>
>>>integer,parameter::v(3)=(/3,1,2/)
>>>real x(3)
>>>data (x(v(i)),i=1,3)/4.,6.,2./
>>>print *,x
>>>end
>>>
>>
>>This is a tricky one that may call for an interpretation.
>>
>>61:34-35 says:
>>
>>"Constraint: In a variable that is a data-stmt-object, any subscript, section
>>subscript, substring starting point, and substring ending point shall be an
>>initialization expression."
>
>
> Sorry, but this reasoning is incorrect.  (Just as well, because it would
> have outlawed ALL data-implied-do subscripting!).

Yup! I did not read the bnf carefully enough. I was in the company of at least
two compiler vendors who thought the example was invalid!

John Reid.