From 5d7cb8dff5604ea7f2a1cc598a95b2067c16dde6 Mon Sep 17 00:00:00 2001 From: Jan Kratochvil Date: Thu, 12 Feb 2009 09:15:07 +0000 Subject: gdb/ PR fortran/9806 * dwarf2read.c (process_die , read_module) (scan_partial_symbols , add_partial_module): New. gdb/testsuite/ PR fortran/9806 * gdb.fortran/module.exp, gdb.fortran/module.f90: New. --- gdb/testsuite/gdb.fortran/module.f90 | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 gdb/testsuite/gdb.fortran/module.f90 (limited to 'gdb/testsuite/gdb.fortran/module.f90') 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 . + +module mod + integer :: i = 42 +end module mod + + use mod + print *, i +end -- cgit v1.1