gcc-4.9/gcc/testsuite/gfortran.dg/stfunc_7.f90


1
2
3
4
5
6
7
8
9
10

! { dg-do compile }
! { dg-options "-std=legacy" }
!
! PR 50553: statement function cannot be target (r178939)
!
! Contributed by Vittorio Zecca <zeccav@gmail.com>

f(x)=x
target f  ! { dg-error "attribute conflicts with" }
end