diff options
author | Pedro Alves <palves@redhat.com> | 2012-01-05 13:11:31 +0000 |
---|---|---|
committer | Pedro Alves <palves@redhat.com> | 2012-01-05 13:11:31 +0000 |
commit | 2ca0b532fd230a6d5b2465105010e51baa51f44b (patch) | |
tree | f69f1f2a43a24157770bbcec491914ab6a5af536 /gdb/testsuite | |
parent | 50aeff07f4ff130053310127b1522b3c7f15a230 (diff) | |
download | gdb-2ca0b532fd230a6d5b2465105010e51baa51f44b.zip gdb-2ca0b532fd230a6d5b2465105010e51baa51f44b.tar.gz gdb-2ca0b532fd230a6d5b2465105010e51baa51f44b.tar.bz2 |
2012-01-05 Khoo Yit Phang <khooyp@cs.umd.edu>
* infrun.c (normal_stop): Don't skip calling the normal_stop
observers if the thread was doing a multi-step, but stopped for
some reason other than stepping.
gdb/testsuite/
2012-01-05 Pedro Alves <alves.ped@gmail.com>
* gdb.mi/mi-stepn.c, gdb.mi/mi-stepn.exp: New files.
* gdb.python/py-events.c (first): Add bits for new "step N" test.
* gdb.python/py-events.exp: Test that "step N" tripping on a
breakpoint emits a breakpoint event.
Diffstat (limited to 'gdb/testsuite')
-rw-r--r-- | gdb/testsuite/ChangeLog | 7 | ||||
-rw-r--r-- | gdb/testsuite/gdb.mi/mi-stepn.c | 32 | ||||
-rw-r--r-- | gdb/testsuite/gdb.mi/mi-stepn.exp | 46 | ||||
-rw-r--r-- | gdb/testsuite/gdb.python/py-events.c | 5 | ||||
-rw-r--r-- | gdb/testsuite/gdb.python/py-events.exp | 12 |
5 files changed, 102 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index d23458d..c79071c 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2012-01-05 Pedro Alves <alves.ped@gmail.com> + + * gdb.mi/mi-stepn.c, gdb.mi/mi-stepn.exp: New files. + * gdb.python/py-events.c (first): Add bits for new "step N" test. + * gdb.python/py-events.exp: Test that "step N" tripping on a + breakpoint emits a breakpoint event. + 2012-01-03 Joel Brobecker <brobecker@adacore.com> * gdb.base/auxv.exp: Reformat the copyright notice. diff --git a/gdb/testsuite/gdb.mi/mi-stepn.c b/gdb/testsuite/gdb.mi/mi-stepn.c new file mode 100644 index 0000000..b8663d9 --- /dev/null +++ b/gdb/testsuite/gdb.mi/mi-stepn.c @@ -0,0 +1,32 @@ +/* This testcase is part of GDB, the GNU debugger. + + Copyright 2012 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/>. +*/ + +void +do_nothing (void) +{ +} + +int +main () +{ + int i; + + for (i = 0; i < 2; i++) + do_nothing (); + return 0; +} diff --git a/gdb/testsuite/gdb.mi/mi-stepn.exp b/gdb/testsuite/gdb.mi/mi-stepn.exp new file mode 100644 index 0000000..f723872 --- /dev/null +++ b/gdb/testsuite/gdb.mi/mi-stepn.exp @@ -0,0 +1,46 @@ +# Copyright 2011-2012 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/>. + +# Verify that when "-exec-step N" trips on a breakpoint, we get a +# *stop event with reason breakpoint-hit. + +load_lib mi-support.exp +set MIFLAGS "-i=mi" + +gdb_exit +if [mi_gdb_start] { + continue +} + +set testfile "mi-stepn" +set srcfile ${testfile}.c +set executable ${testfile} +set binfile ${objdir}/${subdir}/${executable} + +set opts {debug} +if [build_executable ${testfile}.exp ${executable} ${srcfile} $opts] { + return -1 +} + +if {[mi_run_to_main] < 0} { + return -1 +} + +mi_create_breakpoint do_nothing 2 keep do_nothing .* .* .* \ + "breakpoint at do_nothing" + +mi_send_resuming_command "exec-step 3" "" +mi_expect_stop "breakpoint-hit" "do_nothing" "\[^\n\]*" "$srcfile" \ + "\[0-9\]*" {"" "disp=\"keep\""} "breakpoint-hit reported" diff --git a/gdb/testsuite/gdb.python/py-events.c b/gdb/testsuite/gdb.python/py-events.c index 00490c6..5b9a0c5 100644 --- a/gdb/testsuite/gdb.python/py-events.c +++ b/gdb/testsuite/gdb.python/py-events.c @@ -24,6 +24,11 @@ int second(){ } int first(){ + int i; + + for (i = 0; i < 2; i++) + do_nothing (); + return second(); } diff --git a/gdb/testsuite/gdb.python/py-events.exp b/gdb/testsuite/gdb.python/py-events.exp index 0b5c1cf..0715d3c 100644 --- a/gdb/testsuite/gdb.python/py-events.exp +++ b/gdb/testsuite/gdb.python/py-events.exp @@ -73,6 +73,18 @@ gdb_test "continue" ".*event type: continue.* .*breakpoint number: 3.* all threads stopped" +# Test that when "step N" trips on a breakpoint, we get a stop event +# with breakpoint stop reason. +gdb_breakpoint "do_nothing" +gdb_test "step 3" ".*event type: continue.* +.*event type: stop.* +.*stop reason: breakpoint.* +.*first breakpoint number: 4.* +.*breakpoint number: 4.* +all threads stopped" + +delete_breakpoints + #test exited event. gdb_test "continue" ".*event type: continue.* .*event type: exit.* |