------- Comment #1 from dfranke at gcc dot gnu dot org  2009-12-11 22:30 -------
I think this one is actually ok. The message is emitted rank-times, once for
each non-integer rank, for each variable. 

Here we get it three times:
  real, parameter :: n = 2
  real, dimension(n) :: x, y, z
end

Here 4*3 = 12 times:
  real, parameter :: n = 2
  real, dimension(n, n, n, n) :: x, y, z
end

Here just once:
  real, parameter :: n = 2
  real :: x, y(n), z
end

Thus, all fine?!


-- 

dfranke at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |dfranke at gcc dot gnu dot
                   |                            |org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37691

Reply via email to