rt_gccstream/gcc/testsuite/gfortran.dg/d_lines_2.f

7 lines
108 B
Fortran

! { dg-do compile }
c { dg-options "-fd-lines-as-code" }
i = 0
d end
subroutine s
D end