aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.base
diff options
context:
space:
mode:
authorDaniel Berlin <dberlin@dberlin.org>2000-03-25 15:32:19 +0000
committerDaniel Berlin <dberlin@dberlin.org>2000-03-25 15:32:19 +0000
commit1c689132b1c0864f109d63b2f6a32a10d2da2ad2 (patch)
treef9d1aae6e4b2aa2bf49ff5e9d0575788ea7752d8 /gdb/testsuite/gdb.base
parent8399535b5b1f0e7752947d4c67369c88b73b55c1 (diff)
downloadgdb-1c689132b1c0864f109d63b2f6a32a10d2da2ad2.zip
gdb-1c689132b1c0864f109d63b2f6a32a10d2da2ad2.tar.gz
gdb-1c689132b1c0864f109d63b2f6a32a10d2da2ad2.tar.bz2
Fix maintenance deprecate crash, add testcase
Diffstat (limited to 'gdb/testsuite/gdb.base')
-rw-r--r--gdb/testsuite/gdb.base/commands.exp35
1 files changed, 15 insertions, 20 deletions
diff --git a/gdb/testsuite/gdb.base/commands.exp b/gdb/testsuite/gdb.base/commands.exp
index f15f49d..180b84d 100644
--- a/gdb/testsuite/gdb.base/commands.exp
+++ b/gdb/testsuite/gdb.base/commands.exp
@@ -4,15 +4,15 @@
# 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.
+# 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@prep.ai.mit.edu
@@ -69,7 +69,7 @@ proc gdbvar_complex_if_while_test {} {
proc progvar_simple_if_test {} {
global gdb_prompt
- if [target_info exists noargs] {
+ if [target_info exists noargs] {
verbose "Skipping progvar_simple_if_test because of noargs."
return
}
@@ -88,7 +88,7 @@ proc progvar_simple_if_test {} {
proc progvar_simple_while_test {} {
global gdb_prompt
- if [target_info exists noargs] {
+ if [target_info exists noargs] {
verbose "Skipping progvar_simple_while_test because of noargs."
return
}
@@ -106,7 +106,7 @@ proc progvar_simple_while_test {} {
proc progvar_complex_if_while_test {} {
global gdb_prompt
- if [target_info exists noargs] {
+ if [target_info exists noargs] {
verbose "Skipping progvar_simple_if_while_test because of noargs."
return
}
@@ -122,7 +122,7 @@ proc progvar_complex_if_while_test {} {
}
proc if_while_breakpoint_command_test {} {
- if [target_info exists noargs] {
+ if [target_info exists noargs] {
verbose "Skipping if_while_breakpoint_command_test because of noargs."
return
}
@@ -153,7 +153,7 @@ proc if_while_breakpoint_command_test {} {
# Test that we can run the inferior from breakpoint commands.
proc infrun_breakpoint_command_test {} {
- if [target_info exists noargs] {
+ if [target_info exists noargs] {
verbose "Skipping infrun_breakpoint_command_test because of noargs."
return
}
@@ -166,7 +166,7 @@ proc infrun_breakpoint_command_test {} {
delete_breakpoints
gdb_test "break factorial if value == 5" "Breakpoint.*at.*"
-# infrun_breakpoint_command_test - This test was broken into two parts
+# infrun_breakpoint_command_test - This test was broken into two parts
# to get around a synchronization problem in expect.
# part1: issue the gdb command "commands"
# part2: send the list of commands
@@ -207,7 +207,7 @@ factorial \\(value=3\\) at .*
}
proc breakpoint_command_test {} {
- if [target_info exists noargs] {
+ if [target_info exists noargs] {
verbose "Skipping breakpoint_command_test because of noargs."
return
}
@@ -253,7 +253,7 @@ proc watchpoint_command_test {} {
global noargs
global gdb_prompt
- if [target_info exists noargs] {
+ if [target_info exists noargs] {
verbose "Skipping watchpoint_command_test because of noargs."
return
}
@@ -331,7 +331,7 @@ proc watchpoint_command_test {} {
proc test_command_prompt_position {} {
global gdb_prompt
- if [target_info exists noargs] {
+ if [target_info exists noargs] {
verbose "Skipping test_command_prompt_position because of noargs."
return
}
@@ -377,8 +377,8 @@ proc test_command_prompt_position {} {
proc deprecated_command_test {} {
-
-
+
+
gdb_test "maintenance deprecate blah" "Can't find command.*" \
"tried to deprecate non-existsing command"
@@ -397,6 +397,7 @@ proc deprecated_command_test {} {
gdb_test "maintenance deprecate set endian big" "" "deprecate long comamnd"
gdb_test "set endian big" "Warning: command 'set endian big' is deprecated.*No alternative known.*" "long command deprecated with no alternative."
+ gdb_test "maintenance deprecate" "\"maintenance deprecate\".*" "deprecate with no arguments"
}
@@ -413,9 +414,3 @@ user_defined_command_test
watchpoint_command_test
test_command_prompt_position
deprecated_command_test
-
-
-
-
-
-