! { dg-do compile }
! { dg-options "-fd-lines-as-comments" }
d This is a comment.
D This line, too.
      end