1c { dg-do compile }
2      subroutine foo
3      implicit none
4      include 'include_10.inc'
5      i = 1
6      end subroutine foo
7      subroutine bar
8      implicit none
9      i n cl UD e'include_10.inc'
10      i = 1
11      end subroutine bar
12