------- Comment #3 from tkoenig at gcc dot gnu dot org 2009-12-05 22:14 ------- Reduced test case, from c2.f90:
module m_sort implicit none type, abstract :: sort_t contains procedure(gt_cmp), deferred :: gt_cmp end type sort_t contains subroutine bsort(a) class(sort_t), intent(inout) :: a(:) if (a(1)%gt_cmp(a(2))) then ! ICE end if end subroutine bsort end module m_sort -- tkoenig at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |NEW Ever Confirmed|0 |1 Last reconfirmed|0000-00-00 00:00:00 |2009-12-05 22:14:52 date| | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41951