mirror of
https://gcc.gnu.org/git/gcc.git
synced 2025-01-27 06:44:12 +08:00
New test
From-SVN: r36682
This commit is contained in:
parent
304daac5d9
commit
9256db1dea
9
gcc/testsuite/g77.f-torture/compile/cpp.F
Normal file
9
gcc/testsuite/g77.f-torture/compile/cpp.F
Normal file
@ -0,0 +1,9 @@
|
||||
C When run through the C preprocessor, the indentation of the
|
||||
C CONTINUE line must not be mangled.
|
||||
subroutine aap(a, n)
|
||||
dimension a(n)
|
||||
do 10 i = 1, n
|
||||
a(i) = i
|
||||
10 continue
|
||||
print *, a(1)
|
||||
end
|
Loading…
Reference in New Issue
Block a user