xref: /dports/lang/gcc10-devel/gcc-10-20211008/gcc/testsuite/gfortran.dg/d_lines_2.f

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