binutils/

[external/binutils.git] / gdb / testsuite / gdb.base / info-proc.exp

diff --git a/gdb/testsuite/gdb.base/info-proc.exp b/gdb/testsuite/gdb.base/info-proc.exp
index fb91bd3..105116a 100644 (file)
--- a/gdb/testsuite/gdb.base/info-proc.exp
+++ b/gdb/testsuite/gdb.base/info-proc.exp
@@ -1,4 +1,5 @@
-# Copyright 2002, 2003, 2004, 2007, 2008 Free Software Foundation, Inc.
+# Copyright 2002, 2003, 2004, 2007, 2008, 2009, 2010, 2011
+# 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
@@ -13,9 +14,6 @@
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-# Please email any bugs, comments, and/or additions to this file to:
-# bug-gdb@prep.ai.mit.edu
-
 # This file was written by Michael Snyder (msnyder@redhat.com)
 # This is a test for the gdb command "info proc"
 
@@ -27,8 +25,6 @@ if { [is_remote target] } then {
   continue
 }
 
-set prms_id 0
-set bug_id 0
 
 set ws "\[ \t\]+"
 
@@ -60,8 +56,7 @@ gdb_reinitialize_dir $srcdir/$subdir
 gdb_load ${binfile}
 
 # Does this gdb support info proc?
-send_gdb "help info proc\n"
-gdb_expect {
+gdb_test_multiple "help info proc" "help info proc" {
     -re "Undefined info command: .proc..  Try .help info.*$gdb_prompt $" {
        # info proc command not supported -- nothing to test here.
        unsupported "gdb does not support info proc on this target"
@@ -70,12 +65,6 @@ gdb_expect {
     -re "Show /proc process information about .*$gdb_prompt $" {
        pass "help info proc"
     }
-    -re ".*$gdb_prompt $" {
-       fail "help info proc"
-    }
-    timeout {
-       fail "help info proc (timeout)"
-    }
 }
 
 gdb_test "info proc" "No current process.*" "info proc without a process"