2012-02-02 Pedro Alves <palves@redhat.com>
[external/binutils.git] / gdb / testsuite / gdb.base / term.exp
1 #   Copyright 1988, 1990-1992, 1994-1997, 1999, 2007-2012 Free Software
2 #   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
17 # Don't try this for remote targets.
18 if [is_remote target] then {
19     continue
20 }
21
22 if { [prepare_for_testing term.exp term term.c] } {
23     return -1
24 }
25
26 # Once before running the program.
27 gdb_test "info terminal" \
28     "No saved terminal information.*" \
29     "test info terminal"
30
31 if ![runto_main] then {
32     fail "Can't run to main"
33     return 0
34 }
35
36 # Once while the program is running and stopped.
37 gdb_test "info terminal" \
38     "Inferior's terminal status .currently saved by GDB.:.*" \
39     "info terminal at breakpoint"
40
41 gdb_continue_to_end
42
43 # One last time after the program having exited.
44 gdb_test "info terminal" \
45     "No saved terminal information.*" \
46     "test info terminal #2"