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