[Bug fortran/47583] Inquire affected by previous read

[kargl at gcc dot gnu.org]

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

kargl at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |kargl at gcc dot gnu.org
      Known to work|                            |4.3.6, 4.4.6, 4.5.3

--- Comment #1 from kargl at gcc dot gnu.org 2011-02-01 22:16:52 UTC ---
Slightly reduced test case.

subroutine input(indat)
   real indat(:)
   read(*,*) indat
end subroutine input

subroutine abc(sizedat)
   real, intent(in) :: sizedat(:)
   integer :: rl
   inquire(iolength=rl) sizedat
   write(*,*) rl
end subroutine abc