2 ! PR fortran/95340 - ICE in gfc_match_select_rank, at fortran/match.c:6690
7 class(t
) :: z
! { dg-error "must be dummy, allocatable or pointer" }
8 select
rank (z
) ! { dg-error "must be an assumed rank variable" }
9 end select
! { dg-error "Expecting END PROGRAM" }