------- Comment #1 from kargl at gcc dot gnu dot org 2008-11-03 00:00 ------- Code works with 4.3.2 and trunk.
Note you probably want to 1) Update to a 4.3.2 or newer compiler. 2) Change the example to program test_shape integer :: i print *, size(shape(i)) ! Shape of a scalar allowed by f95 standards. end program test_shape because shape(i) is a zero sized array. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37999
