gcc/testsuite/gfortran.dg/debug_2.f


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

# 1 "debug_2.F"
# 1 "<built-in>"
# 1 "<command line>"
# 1 "debug_2.F"
# 3 "debug_2.inc1" 1
# 4 "debug_2.inc2" 1
! The above lines must be present as is.
! PR fortran/34084
! { dg-do compile }
! { dg-options "-g" }
      subroutine foo
      end subroutine foo
# 4 "debug_2.inc1" 2
# 2 "debug_2.F" 2
      program bar
      end program bar