Reported on clf by Ev. Drikos

type t6
   integer :: i
   class(t6), allocatable :: foo
end type t6
type(t6) :: x

x = t6(42, t6(99,NULL()))

print *, "hello", x%foo%i

end

causes an infinite compiler loop. Replacing CLASS with TYPE in the component declaration removes the problem.

I will take it.

Paul