diff options
author | Jason Molenda <jsm@bugshack.cygnus.com> | 2000-01-11 03:07:37 +0000 |
---|---|---|
committer | Jason Molenda <jsm@bugshack.cygnus.com> | 2000-01-11 03:07:37 +0000 |
commit | e31cf3b5740670d856962824e983e893aca5acd0 (patch) | |
tree | 0c7f4b3102340776bf12f87c2f4666874ba618ab /gdb/testsuite/gdb.base/selftest.exp | |
parent | efbdfc61a9659829f2e641021240cecd2fc0f414 (diff) | |
download | gdb-e31cf3b5740670d856962824e983e893aca5acd0.tar.gz |
import gdb-2000-01-10 snapshot
Diffstat (limited to 'gdb/testsuite/gdb.base/selftest.exp')
-rw-r--r-- | gdb/testsuite/gdb.base/selftest.exp | 40 |
1 files changed, 26 insertions, 14 deletions
diff --git a/gdb/testsuite/gdb.base/selftest.exp b/gdb/testsuite/gdb.base/selftest.exp index 72a086e63b1..dddb7a40830 100644 --- a/gdb/testsuite/gdb.base/selftest.exp +++ b/gdb/testsuite/gdb.base/selftest.exp @@ -51,9 +51,29 @@ proc do_steps_and_nexts {} { gdb_reinitialize_dir $srcdir/.. - for {set count 0} {$count < 20} {incr count} { + for {set count 0} {$count < 22} {incr count} { send_gdb "list\n" gdb_expect { + -re ".*context = data.*$gdb_prompt $" { + set description "step over context initialization" + set command "step" + } + -re ".*argc = context->argc.*$gdb_prompt $" { + set description "step over argc initialization" + set command "step" + } + -re ".*argv = context->argv.*$gdb_prompt $" { + set description "step over argv initialization" + set command "step" + } + -re ".*quiet = 0.*$gdb_prompt $" { + set description "step over quiet initialization" + set command "step" + } + -re ".*batch = 0.*$gdb_prompt $" { + set description "step over batch initialization" + set command "step" + } -re ".*symarg = NULL.*$gdb_prompt $" { set description "step over symarg initialization" set command "step" @@ -74,10 +94,6 @@ proc do_steps_and_nexts {} { set description "step over ttyarg initialization" set command "step" } - -re ".*interparg = NULL.*$gdb_prompt $" { - set description "step over interparg initialization" - set command "step" - } -re ".*time_at_startup = get_run_time.*$gdb_prompt $" { set description "next over get_run_time and everything it calls" set command "next" @@ -106,10 +122,6 @@ proc do_steps_and_nexts {} { set description "next over conditional stack alignment alloca" set command "next" } - -re ".*SET_TOP_LEVEL.*$gdb_prompt $" { - set description "next over SET_TOP_LEVEL call" - set command "next" - } -re ".*cmdsize = 1.*$gdb_prompt $" { set description "step over cmdsize initialization" set command "next" @@ -199,9 +211,9 @@ proc test_with_self { executable } { "Disassemble main" # Set a breakpoint at main - gdb_test "break main" \ + gdb_test "break captured_main" \ "Breakpoint.*at.* file.*, line.*" \ - "breakpoint in main" + "breakpoint in captured_main" # We'll need this when we send a ^C to GDB. Need to do it before we # run the program and gdb starts saving and restoring tty states. @@ -222,13 +234,13 @@ proc test_with_self { executable } { # so we bump it back up for the duration of this command. set timeout 600 - set description "run until breakpoint at main" + set description "run until breakpoint at captured_main" send_gdb "run -nw\n" gdb_expect { - -re "Starting program.*Breakpoint \[0-9\]+,.*main .argc.*argv.* at .*main.c:.*$gdb_prompt $" { + -re "Starting program.*Breakpoint \[0-9\]+,.*captured_main .data.* at .*main.c:.*$gdb_prompt $" { pass "$description" } - -re "Starting program.*Breakpoint \[0-9\]+,.*main .argc.*argv.*$gdb_prompt $" { + -re "Starting program.*Breakpoint \[0-9\]+,.*captured_main .data.*$gdb_prompt $" { xfail "$description (line numbers scrambled?)" } -re "vfork: No more processes.*$gdb_prompt $" { |