gcc/testsuite/gfortran.dg/noreturn-4.f90

   1 ! { dg-do run { target { nonpic || pie_enabled } } }
   2 ! { dg-options "-O2" }
   3
   4 program bar
   5 call foo1()
   6 call noreturn_autodetection_failed() ! check if optimized out
   7 end program
   8
   9 subroutine foo1
  10 stop 0
  11 end subroutine foo1