1 files changed, 10 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/g77/cpp.F b/gcc/testsuite/gfortran.dg/g77/cpp.F
new file mode 100644
index 000000000..42c4735c9
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/g77/cpp.F
@@ -0,0 +1,10 @@
+c { dg-do compile }
+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