(Sorry, the formatting was lost in my previous post.)
The following code does not compile:
ifort abc.f90 -o abc
abc.f90(23): error #6580: Name in only-list does not exist. [T_ADD]
use abc, only: t, t_add
-------------------^
Isn't the code fine? (just as a note, gfortran accepts it).
ifort -V
Intel Fortran Intel 64 Compiler Professional for applications
running on Intel 64, Version 11.1 Build 20100414 Package ID:
l_cprof_p_11.1.072
module abc
implicit none
public :: t, t_add
type t
integer :: i
contains
procedure, pass(t_obj) :: add => t_add
end type t
contains
pure subroutine t_add(t_obj,n)
class(t), intent(inout) :: t_obj
integer, intent(in) :: n
t_obj%i = t_obj%i + n
end subroutine t_add
end module abc
program p
use abc, only: t, t_add
implicit none
end program p
