1! { dg-do compile }
2! PR fortran/50540
3!
4  implicit none
5  integer i,dest(10)
6  forall (i=2:ix)  dest(i)=i ! { dg-error "has no IMPLICIT type" }
7end
8
9! { dg-excess-errors "Can't convert UNKNOWN to INTEGER" }
10