From d79416713d94920dce6f321ef5c29e586653438b Mon Sep 17 00:00:00 2001 From: Andrew Cagney Date: Wed, 9 Feb 2005 14:54:24 +0000 Subject: [PATCH] 2005-02-09 Andreas Schwab Committed by Andrew Cagney * gdb.base/remotetimeout.exp: New file. --- gdb/testsuite/ChangeLog | 5 +++ gdb/testsuite/gdb.base/remotetimeout.exp | 46 ++++++++++++++++++++++++ 2 files changed, 51 insertions(+) create mode 100644 gdb/testsuite/gdb.base/remotetimeout.exp diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index dd18933af3f..a66e0584b56 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2005-02-09 Andreas Schwab + + Committed by Andrew Cagney + * gdb.base/remotetimeout.exp: New file. + 2005-02-07 Mark Kettenis * gdb.base/interp.exp: Remove trailing \n in gdb_test commands. diff --git a/gdb/testsuite/gdb.base/remotetimeout.exp b/gdb/testsuite/gdb.base/remotetimeout.exp new file mode 100644 index 00000000000..dd4e2a9277e --- /dev/null +++ b/gdb/testsuite/gdb.base/remotetimeout.exp @@ -0,0 +1,46 @@ +# Copyright 2004 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 2 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, write to the Free Software +# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + +# Please email any bugs, comments, and/or additions to this file to: +# bug-gdb@gnu.org + +# This is a test for the gdb invocation option -l. + +if $tracelevel then { + strace $tracelevel +} + + +global GDBFLAGS + +# Skip test if target does not support argument passing. +if [target_info exists noargs] { + return; +} + +# +# Test that -l is processed correctly. +# +set old_gdbflags $GDBFLAGS +set GDBFLAGS "-l 42" +gdb_exit +gdb_start +gdb_test "show remotetimeout" \ + "Timeout limit to wait for target to respond is 42\." \ + "correct remotetimeout printed" + +set GDBFLAGS $old_gdbflags + -- 2.30.2