darlinghq/darling-gdb
1
0
Fork 0
mirror of https://github.com/darlinghq/darling-gdb.git synced 2024-11-28 06:20:30 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

* gdb.base/selftest.exp (do_steps_and_nexts): Increase maximum

Browse Source 
initial line count of 'captured_main' from 26 to 32.
	(test_with_self): Allow xmalloc call to be interleaved with the
	preceding two lines.
This commit is contained in:
Daniel Jacobowitz 2003-06-28 16:36:42 +00:00
parent 0fac0b4199
commit 48fe539ffe
2 changed files with 31 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,11 @@
2003-06-22 Michael Chastain <mec@shout.net>
Daniel Jacobowitz <drow@mvista.com>
* gdb.base/selftest.exp (do_steps_and_nexts): Increase maximum
initial line count of 'captured_main' from 26 to 32.
(test_with_self): Allow xmalloc call to be interleaved with the
preceding two lines.
2003-06-24 Joel Brobecker <brobecker@gnat.com>
* gdb.base/bang.exp: New testcase.

25
gdb/testsuite/gdb.base/selftest.exp
View File

@ -1,4 +1,4 @@
# Copyright 1988, 1990, 1991, 1992, 1994, 1997, 1999, 2000, 2002
# Copyright 1988, 1990, 1991, 1992, 1994, 1997, 1999, 2000, 2002, 2003
# Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
@ -52,7 +52,7 @@ proc do_steps_and_nexts {} {
gdb_reinitialize_dir $srcdir/..
for {set count 0} {$count < 26} {incr count} {
for {set count 0} {$count < 32} {incr count} {
send_gdb "list\n"
# NOTE: carlton/2002-12-11: The "initial brace" and
# "current_directory initialization" possibilities happen to
@ -327,10 +327,31 @@ proc test_with_self { executable } {
# If we don't actually enter the xmalloc call when we give a
# step command that seems like a genuine bug. It seems to happen
# on most RISC processors.
# NOTE drow/2003-06-22: However, if we step back to the preceding two
# lines, just keep stepping until we enter.
set stepped_back 0
setup_xfail "alpha-*-*" "mips-*-*"
set description "step into xmalloc call"
send_gdb "step\n"
gdb_expect {
-re "ncmd = 0;.*$gdb_prompt $" {
set stepped_back 1
send_gdb "step\n"
exp_continue
}
-re "dirsize = 1;.*$gdb_prompt $" {
set stepped_back 1
send_gdb "step\n"
exp_continue
}
-re ".*dirarg = .* xmalloc.*$gdb_prompt $" {
if { $stepped_back == 1 } {
send_gdb "step\n"
exp_continue
} else {
fail "$description"
}
}
-re "xmalloc.*size=.*at.*utils.c.*$gdb_prompt $" {
pass "$description"
}