llvm/flang/test/Semantics/resolve112.f90

! RUN: %python %S/test_errors.py %s %flang_fc1

! If there are 2 or more use-associated symbols
! from different modules with the same name,
! the error should be generated only if
! the name is actually used.
module a
  contains
    function foo()
      foo = 42
    end function foo
end module a

module b
  contains
    function foo()
      foo = 42
    end function foo
end module b

subroutine without_error
  use a
  use b
end subroutine without_error

subroutine with_error
  use a
  use b
  integer :: res
  ! ERROR: Reference to 'foo' is ambiguous
  res = foo()
end subroutine with_error