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