https://gcc.gnu.org/bugzilla/show_bug.cgi?id=27318

Thomas Koenig <tkoenig at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |tkoenig at gcc dot gnu.org

--- Comment #4 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
This is also not caught:

module test
implicit none
interface
   subroutine hello(n)
     integer :: n
   end subroutine hello
end interface
contains
  subroutine bar()
     call hello(3)
  end subroutine bar
end module test

subroutine hello(r)
  real :: r
  integer :: i
  do i = 1, int(r); print *, 'hello'; end do
end subroutine hello

Reply via email to