1#   Copyright 1997, 1999, 2007, 2008, 2009, 2010, 2011
2#   Free Software Foundation, Inc.
3
4# This program is free software; you can redistribute it and/or modify
5# it under the terms of the GNU General Public License as published by
6# the Free Software Foundation; either version 3 of the License, or
7# (at your option) any later version.
8#
9# This program is distributed in the hope that it will be useful,
10# but WITHOUT ANY WARRANTY; without even the implied warranty of
11# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12# GNU General Public License for more details.
13#
14# You should have received a copy of the GNU General Public License
15# along with this program.  If not, see <http://www.gnu.org/licenses/>.
16
17if $tracelevel then {
18	strace $tracelevel
19}
20
21
22set testfile twice-tmp
23set srcfile ${testfile}.c
24set binfile ${objdir}/${subdir}/${testfile}
25set options debug
26lappend options "additional_flags=-I."
27
28set fileid [open ${objdir}/${subdir}/${srcfile} w];
29puts $fileid "#include \"twice.c\"";
30close $fileid;
31
32remote_download host ${srcdir}/${subdir}/twice.c twice.c
33
34if  { [gdb_compile "${objdir}/${subdir}/${srcfile}" "${binfile}" executable $options] != "" } {
35     untested twice.exp
36     return -1
37}
38
39# Start with a fresh gdb.
40
41gdb_exit
42gdb_start
43gdb_reinitialize_dir $srcdir/$subdir
44gdb_load $binfile
45
46if [runto_main] then {
47    # Test that GDB can still detect whether we have line numbers
48    # even if we're executing code in an include file.
49
50    # The bug was fixed by
51    #Tue Jun 29 11:02:58 1993  Jim Kingdon  (kingdon@lioth.cygnus.com)
52    #
53    #	* infrun.c (wait_for_inferior): Use find_pc_line not
54    #	find_pc_symtab to check whether there is line number
55    #	information.
56
57    gdb_test "step" "nothing \\(\\) at.*"
58}
59remote_exec build "rm -f twice.c"
60return 0
61