Data implied do

[Steve Kargl]

On Mon, Aug 01, 2005 at 05:20:18PM +0200, Roger Ferrer Ib??ez wrote:
> 
>  PROGRAM p
>   REAL ONE_ARRAY(100, 100)
> 
>   DATA ((ONE_ARRAY (K, J), K = 1, J-1), J = 1, 100) /4950 * 1.0/
>   DATA ((ONE_ARRAY (K, J), K = J, 100), J = 1, 100) /5050 * 0.0/
>  END PROGRAM p
> 
> gfortran yields the following messages:
> 
>  In file snippet.f90:4
> 
>   DATA ((ONE_ARRAY (K, J), K = 1, J-1), J = 1, 100) /4950 * 1.0/
>                                 1
> Error: Variable 'j' at (1) cannot appear in an initialization expression
>  In file snippet.f90:5
> 

(snip)

> 
> Is this a known bug in gfortran ?
> 

It is now! ;-)  Can you file a bugzilla bug report,
so that we can track this bug?

-- 
Steve