https://gcc.gnu.org/bugzilla/show_bug.cgi?id=104927
federico <federico.perini at gmail dot com> changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |RESOLVED
Resolution|--- |INVALID
--- Comment #2 from federico <federico.perini at gmail dot com> ---
Yeah I'm surprised but wrong. The "overriding" option of the rhs size
specification is pretty clear from that statement from the standard.
This makes it even more evident:
program test_invalid_shape
implicit none
integer, dimension(2,2) :: a(3),b(2,5),c
print *, 'shape(a) = ',shape(a)
print *, 'shape(b) = ',shape(b)
print *, 'shape(c) = ',shape(c)
end program test_invalid_shape
produces
shape(a) = 3
shape(b) = 2 5
shape(c) = 2 2
