c { dg-do compile } c { dg-options "-fdec-include" } subroutine foo implicit none 0include 'include_10.inc' i = 1 end subroutine foo subroutine bar implicit none i ;n +c c some comment ll C comment line uu DD ee'include_10.inc' i = 1 end subroutine bar subroutine baz implicit none 0include + 'include_10.inc' i = 1 end subroutine baz subroutine qux implicit none i n C lude 'inc * another comment line &lude_10.inc' i = 1 end subroutine qux subroutine quux implicit none 0inc 1lud 2e ' 3include_10.inc' i = 1 end subroutine quux program include_12 implicit none include ! comment +'include_10.inc' end program subroutine quuz implicit none integer include include +"include_10.inc" i = 1 include + = 2 write (*,*) include end subroutine quuz subroutine corge implicit none include +'include_10.inc' i = 1 end subroutine corge