1C When run through the C preprocessor, the indentation of the
2C CONTINUE line must not be mangled.
3      subroutine aap(a, n)
4      dimension a(n)
5      do 10 i = 1, n
6         a(i) = i
7 10   continue
8      print *, a(1)
9      end
10