1# Copyright 1992, 1994, 1995, 1999, 2002, 2007 Free Software Foundation, Inc. 2 3# This program is free software; you can redistribute it and/or modify 4# it under the terms of the GNU General Public License as published by 5# the Free Software Foundation; either version 3 of the License, or 6# (at your option) any later version. 7# 8# This program is distributed in the hope that it will be useful, 9# but WITHOUT ANY WARRANTY; without even the implied warranty of 10# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 11# GNU General Public License for more details. 12# 13# You should have received a copy of the GNU General Public License 14# along with this program. If not, see <http://www.gnu.org/licenses/>. */ 15 16# Please email any bugs, comments, and/or additions to this file to: 17# bug-gdb@prep.ai.mit.edu 18 19# This file was written by Fred Fish. (fnf@cygnus.com) 20 21if $tracelevel { 22 strace $tracelevel 23} 24 25global message 26global timeout 27 28set timeout 200 29 30gdb_exit 31gdb_start 32 33gdb_test "set pagination off" "" 34gdb_test "show pagination" "State of pagination is off.*" "pagination is off" 35send_gdb "help\n" 36gdb_expect_list "unpaged help" ".*$gdb_prompt $" { 37 "List of classes of commands:" 38 "" 39 "aliases -- Aliases of other commands" 40 "breakpoints -- Making program stop at certain points" 41 "data -- Examining data" 42 "files -- Specifying and examining files" 43 "internals -- Maintenance commands" 44 "obscure -- Obscure features" 45 "running -- Running the program" 46 "stack -- Examining the stack" 47 "status -- Status inquiries" 48 "support -- Support facilities" 49 "tracepoints -- Tracing of program execution without stopping the program" 50 "user-defined -- User-defined commands" 51 "" 52 "Type .help. followed by a class name for a list of commands in that class." 53 "Type .help. followed by command name for full documentation." 54 "Command name abbreviations are allowed if unambiguous." 55} 56 57 58gdb_test "set pagination on" "" 59gdb_test "show pagination" "State of pagination is on.*" "pagination is on" 60gdb_test "set height 10" "" 61send_gdb "help\n" 62gdb_expect_list "paged help" \ 63 ".*---Type <return> to continue, or q <return> to quit---" { 64 "List of classes of commands:" 65 "" 66 "aliases -- Aliases of other commands" 67 "breakpoints -- Making program stop at certain points" 68 "data -- Examining data" 69 "files -- Specifying and examining files" 70 "internals -- Maintenance commands" 71 "obscure -- Obscure features" 72 "running -- Running the program" 73} 74gdb_test "q" 75 76 77gdb_exit 78return 0 79 80