aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.fortran/module.f90
diff options
context:
space:
mode:
authorJan Kratochvil <jan.kratochvil@redhat.com>2009-02-12 09:15:07 +0000
committerJan Kratochvil <jan.kratochvil@redhat.com>2009-02-12 09:15:07 +0000
commit5d7cb8dff5604ea7f2a1cc598a95b2067c16dde6 (patch)
treece7ccf6062f9ff50585b7e20f040569cd8a4e628 /gdb/testsuite/gdb.fortran/module.f90
parent872989673f47ba85685648338b2bc55130ecaaf9 (diff)
downloadbinutils-5d7cb8dff5604ea7f2a1cc598a95b2067c16dde6.zip
binutils-5d7cb8dff5604ea7f2a1cc598a95b2067c16dde6.tar.gz
binutils-5d7cb8dff5604ea7f2a1cc598a95b2067c16dde6.tar.bz2
gdb/
PR fortran/9806 * dwarf2read.c (process_die <DW_TAG_module>, read_module) (scan_partial_symbols <DW_TAG_module>, add_partial_module): New. gdb/testsuite/ PR fortran/9806 * gdb.fortran/module.exp, gdb.fortran/module.f90: New.
Diffstat (limited to 'gdb/testsuite/gdb.fortran/module.f90')
-rw-r--r--gdb/testsuite/gdb.fortran/module.f9022
1 files changed, 22 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.fortran/module.f90 b/gdb/testsuite/gdb.fortran/module.f90
new file mode 100644
index 0000000..501ccc8
--- /dev/null
+++ b/gdb/testsuite/gdb.fortran/module.f90
@@ -0,0 +1,22 @@
+! Copyright 2009 Free Software Foundation, Inc.
+!
+! This program is free software; you can redistribute it and/or modify
+! it under the terms of the GNU General Public License as published by
+! the Free Software Foundation; either version 3 of the License, or
+! (at your option) any later version.
+!
+! This program is distributed in the hope that it will be useful,
+! but WITHOUT ANY WARRANTY; without even the implied warranty of
+! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+! GNU General Public License for more details.
+!
+! You should have received a copy of the GNU General Public License
+! along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+module mod
+ integer :: i = 42
+end module mod
+
+ use mod
+ print *, i
+end