gcc/testsuite/gfortran.dg/no_overwrite_recursive_2.f90 - gcc - Git at Google

 ! { dg-do compile }
 ! { dg-options "-fno-automatic -frecursive -Wno-overwrite-recursive" }
 !
 ! Test case contributed by Mark Eggleston  <mark.eggleston@codethink.com>
 !

 program test
   ! do nothing
 end program
	! { dg-do compile }
	! { dg-options "-fno-automatic -frecursive -Wno-overwrite-recursive" }
	!
	! Test case contributed by Mark Eggleston <mark.eggleston@codethink.com>
	!

	program test
	! do nothing
	end program