https://gcc.gnu.org/bugzilla/show_bug.cgi?id=114874
--- Comment #5 from Paul Thomas <pault at gcc dot gnu.org> ---
(In reply to Paul Thomas from comment #4)
> (In reply to anlauf from comment #3)
> > Adding Paul, hoping that he can tell what changed for SELECT TYPE recently.
>
When c is an array, it compiles and runs fine with mainline. The parse-tree
looks sensible too, unlike the scalar version.
program p
implicit none
class(*), allocatable :: c(:)
c = ['abc']
select type (c)
type is (character(*))
print *, c
print *, c(1)(2:2) ! Doesn't ICE
end select
end
Paul
