http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41951
--- Comment #11 from janus at gcc dot gnu.org 2012-06-19 15:53:02 UTC ---
Here is a reduced version of comment 2, which is invalid according to comment
10:
module m_sort
implicit none
type, abstract :: sort_t
contains
generic :: assignment(=) => assign
procedure(assign_it), deferred :: assign
end type
interface assignment(=)
subroutine assign_it (lhs, rhs)
import
class(sort_t), intent(out) :: lhs
class(sort_t), intent(in) :: rhs
end subroutine
end interface
end module