diff options
author | Kung Hsu <kung@cygnus> | 1995-04-01 00:17:12 +0000 |
---|---|---|
committer | Kung Hsu <kung@cygnus> | 1995-04-01 00:17:12 +0000 |
commit | 4d1edc2e854630fd753522778f5eaad1c3932813 (patch) | |
tree | 70df748a417f7cbe7933b3d5424efc2a9685e12c /gdb | |
parent | 4729c3e2ca86965174dfb3813e950e394b913a6f (diff) | |
download | gdb-4d1edc2e854630fd753522778f5eaad1c3932813.zip gdb-4d1edc2e854630fd753522778f5eaad1c3932813.tar.gz gdb-4d1edc2e854630fd753522778f5eaad1c3932813.tar.bz2 |
* gdb.base/break.exp: Adjust line number, fix rerun.
* gdb.base/langs0.c: Add #ifdef usestubs.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/testsuite/gdb.base/break.exp | 18 |
1 files changed, 14 insertions, 4 deletions
diff --git a/gdb/testsuite/gdb.base/break.exp b/gdb/testsuite/gdb.base/break.exp index 1b53a2b..ee8bb0a 100644 --- a/gdb/testsuite/gdb.base/break.exp +++ b/gdb/testsuite/gdb.base/break.exp @@ -23,6 +23,8 @@ if $tracelevel then { strace $tracelevel } +global usestubs + # # test running programs # @@ -42,6 +44,14 @@ gdb_start gdb_reinitialize_dir $srcdir/$subdir gdb_load $objdir/$subdir/$binfile +if $usestubs { + send "step\n" + # if use stubs step out of the breakpoint() function. + expect { + -re "main.* at .*$prompt $" {} + timeout { fail "single step at breakpoint() (timeout)" ; return 0 } + } +} # # test simple breakpoint setting commands # @@ -111,7 +121,7 @@ gdb_test "break $srcfile:70" \ # gdb_test "info break" \ "Num Type\[ \]+Disp Enb Address\[ \]+What.* -\[0-9\]+\[\t \]+breakpoint keep y.* in main at .*$srcfile:60.* +\[0-9\]+\[\t \]+breakpoint keep y.* in main at .*$srcfile:57.* \[0-9\]+\[\t \]+breakpoint keep y.* in factorial at .*$srcfile:76.* \[0-9\]+\[\t \]+breakpoint keep y.* in main at .*$srcfile:64.* \[0-9\]+\[\t \]+breakpoint keep y.* in main at .*$srcfile:64.* @@ -234,7 +244,7 @@ gdb_test "tbreak $srcfile:66" "Breakpoint.*at.* file .*$srcfile, line 66.*" "Te send "info break\n" expect { -re "Num Type.*Disp Enb Address.*What.* -\[0-9\]+\[\t \]+breakpoint del.*y.*in main at .*$srcfile:60.* +\[0-9\]+\[\t \]+breakpoint del.*y.*in main at .*$srcfile:57.* \[0-9\]+\[\t \]+breakpoint del.*y.*in factorial at .*$srcfile:76.* \[0-9\]+\[\t \]+breakpoint del.*y.*in main at .*$srcfile:64.* \[0-9\]+\[\t \]+breakpoint del.*y.*in main at .*$srcfile:70.*$prompt $" { @@ -281,10 +291,10 @@ proc test_next_with_recursion {} { if [istarget "*-*-vxworks*"] then { send "run vxmain \"6\"\n" } else { - send "run\n" + gdb_run_cmd } expect { - -re "Starting .*Break.* factorial .value=6. .*$prompt $" {} + -re "Break.* factorial .value=6. .*$prompt $" {} timeout { fail "run to factorial(6)" ; return } } |