gcc/testsuite/gfortran.dg/debug_2.f

   1 # 1 "debug_2.F"
   2 # 1 "<built-in>"
   3 # 1 "<command line>"
   4 # 1 "debug_2.F"
   5 # 3 "debug_2.inc1" 1
   6 # 4 "debug_2.inc2" 1
   7 ! The above lines must be present as is.
   8 ! PR fortran/34084
   9 ! { dg-do compile }
  10 ! { dg-options "-g" }
  11       subroutine foo
  12       end subroutine foo
  13 # 4 "debug_2.inc1" 2
  14 # 2 "debug_2.F" 2
  15       program bar
  16       end program bar