For the program
module foo_mod
implicit none
interface twice
module procedure twice_real
end interface twice
contains
real function twice_real(x)
real :: x
twice_real = 2*x
end function twice_real
end module foo_mod
program xfoo
use foo_mod, only: twice,twice
implicit none
print*,twice(2.3)
end program xfoo
version gcc version 4.2.0 20061011 (experimental)
of gfortran on Windows XP says
In file xduplicate_use.f90:14
use foo_mod, only: twice,twice
1
Error: Symbol 'twice' referenced at (1) not found in
module 'foo_mod'
In the thread "USE, ONLY question" in
comp.lang.fortran, most people thought that repetition
in a USE, ONLY statement was standard-conforming.
If "twice" is replaced with "twice_real" in program
xfoo, it compiles and runs, giving the expected
output.
Vivek Rao
--
Summary: problem with duplicate USE, ONLY of procedure in
INTERFACE
Product: gcc
Version: 4.2.0
Status: UNCONFIRMED
Severity: minor
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: vivekrao4 at yahoo dot com
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29464
