mirror of
https://github.com/autc04/Retro68.git
synced 2024-06-28 11:30:19 +00:00
12 lines
241 B
Fortran
12 lines
241 B
Fortran
c { dg-do compile }
|
|
subroutine foo
|
|
implicit none
|
|
include 'include_10.inc'
|
|
i = 1
|
|
end subroutine foo
|
|
subroutine bar
|
|
implicit none
|
|
i n cl UD e'include_10.inc'
|
|
i = 1
|
|
end subroutine bar
|