diff options
author | Pedro Alves <palves@redhat.com> | 2008-04-17 11:49:56 +0000 |
---|---|---|
committer | Pedro Alves <palves@redhat.com> | 2008-04-17 11:49:56 +0000 |
commit | 0a320680e84174e9aa01c6297fe08666720ed7bf (patch) | |
tree | 668e1e32df786717bb423d442f6c670fe64b165f /gdb/testsuite/gdb.base/step-break.exp | |
parent | 155a0dd76368c9a61a2d640df534d25216963e86 (diff) | |
download | binutils-gdb-0a320680e84174e9aa01c6297fe08666720ed7bf.tar.gz |
gdb/
* inf-loop.c (inferior_event_handler): Also run the intermediate
continuations in the INF_EXEC_COMPLETE case.
gdb/testsuite/
* gdb.base/step-break.exp, gdb.base/step-break.c: New files.
Diffstat (limited to 'gdb/testsuite/gdb.base/step-break.exp')
-rw-r--r-- | gdb/testsuite/gdb.base/step-break.exp | 57 |
1 files changed, 57 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.base/step-break.exp b/gdb/testsuite/gdb.base/step-break.exp new file mode 100644 index 00000000000..20a13c17c6d --- /dev/null +++ b/gdb/testsuite/gdb.base/step-break.exp @@ -0,0 +1,57 @@ +# This testcase is part of GDB, the GNU debugger. + +# Copyright 2008 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 +# the Free Software Foundation; either version 3 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, see <http://www.gnu.org/licenses/>. + +if $tracelevel then { + strace $tracelevel +} + +set testfile step-break +set srcfile ${testfile}.c +set binfile ${objdir}/${subdir}/${testfile} + +if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } { + untested step-break.exp + return -1 +} + +gdb_exit +gdb_start +gdb_reinitialize_dir $srcdir/$subdir +gdb_load ${binfile} + +if ![runto_main] then { + fail "Can't run to main" + return 0 +} + +set bp_location [gdb_get_line_number "set breakpoint here"] + +gdb_test "break $bp_location" \ + "Breakpoint.*at.* file .*$srcfile, line $bp_location\\." \ + "breakpoint line number" + +gdb_test continue "Continuing\\..*Breakpoint \[0-9\]+, main \\(\\) at .*$srcfile:$bp_location.*set breakpoint here.*" \ + "run until breakpoint set at a line number" + +gdb_test "next 2" ".*place2.*" "next 2 (1)" +gdb_test "next 2" ".*place3.*" "next 2 (2)" +gdb_test "next 2" ".*place2.*" "next 2 (3)" +gdb_test "next 2" ".*place3.*" "next 2 (4)" +gdb_test "next 2" ".*place2.*" "next 2 (5)" +gdb_test "next 2" ".*place3.*" "next 2 (6)" + +return 0 |