gcc/testsuite/gfortran.dg/stfunc_8.f90


1
2
3
4
5
6
7
8
9

! { dg-do compile }
! { dg-options "" }
!
! PR fortran/50405
!
! Submitted by zeccav@gmail.com
!
       f(f) = 0 ! { dg-error "Self-referential argument" }
       end