summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/debug_2.f
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gfortran.dg/debug_2.f')
-rw-r--r--gcc/testsuite/gfortran.dg/debug_2.f16
1 files changed, 16 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/debug_2.f b/gcc/testsuite/gfortran.dg/debug_2.f
new file mode 100644
index 000000000..66bc5f6f6
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/debug_2.f
@@ -0,0 +1,16 @@
+# 1 "debug_2.F"
+# 1 "<built-in>"
+# 1 "<command line>"
+# 1 "debug_2.F"
+# 3 "debug_2.inc1" 1
+# 4 "debug_2.inc2" 1
+! The above lines must be present as is.
+! PR fortran/34084
+! { dg-do compile }
+! { dg-options "-g" }
+ subroutine foo
+ end subroutine foo
+# 4 "debug_2.inc1" 2
+# 2 "debug_2.F" 2
+ program bar
+ end program bar