[Bug fortran/89574] [8/9/10/11 Regression] internal compiler error: in conv_function_val, at fortran/trans-expr.c:3792

[anlauf at gcc dot gnu.org]

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

--- Comment #7 from anlauf at gcc dot gnu.org ---
Two slightly reduced testcase variants that ICE with current master:

% cat pr89574-red1.f90
module mod
contains
  subroutine init
  end subroutine
end module mod

module init
  use mod, only : test_init => init
  implicit none
contains
  subroutine sub
    call test_init
  end subroutine sub
end module


% cat pr89574-red2.f90
module mod
contains
  integer function init ()
    init = 0
  end function
end module mod

module init
  use mod, only : test_init => init
  implicit none
contains
  subroutine test_sub
    print *, test_init ()
  end subroutine test_sub
end module


Since changing "module init" to "module init1" avoid the issue in all
cases, this lookslike a namespace / symbol issue.