rt_gccstream/gcc/testsuite/gfortran.dg/stfunc_2.f90

7 lines
192 B
Fortran

! { dg-do compile }
! PR 20467 : we didn't check if a statement function had the dummy attribute.
SUBROUTINE a(b)
b(c) = 0 ! { dg-error "Unclassifiable statement" }
END SUBROUTINE a