[Bug fortran/18108] [gfortran] overloading does not work for functions

[c dot lemmen at fz-juelich dot de]

------- Additional Comments From c dot lemmen at fz-juelich dot de  2004-10-29 08:13 -------
Further reduced, same error:


module foo
implicit none

interface bar
  module procedure bar_real
end interface

contains

function bar_real (rarg)
  real rarg
  logical bar_real
  bar_real = (rarg==0.0)
end function

subroutine baz
  logical l
  l = bar (3.0)
end subroutine

end module foo


-- 


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