repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
2014-04-15 Richard Biener <rguenther@suse.de>
[official-gcc.git]
/
gcc
/
testsuite
/
gfortran.dg
/
include_5.f90
blob
2bfd2bb09dd136a697f710889dd86728c27b7e18
1
! { dg-do compile }
2
! { dg-options "-cpp" }
3
!
4
! PR fortran/37821
5
!
6
! Ensure that for #include "..." and for include the
7
! current directory/directory of the source file is
8
! included.
9
10
subroutine
one
()
11
include
"include_4.inc"
12
integer
(
i4
) ::
i
13
end subroutine
one
14
15
subroutine
two
()
16
#
include
"include_4.inc"
17
integer
(
i4
) ::
i
18
end subroutine
two