summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/stfunc_2.f90
blob: 75ecb057b05ff4f737a8faf98fdabd3405473553 (plain)
1
2
3
4
5
6
! { 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