1 # Copyright 2014-2018 Free Software Foundation, Inc.
2 # This program is free software; you can redistribute it and/or modify
3 # it under the terms of the GNU General Public License as published by
4 # the Free Software Foundation; either version 3 of the License, or
5 # (at your option) any later version.
7 # This program is distributed in the hope that it will be useful,
8 # but WITHOUT ANY WARRANTY; without even the implied warranty of
9 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
10 # GNU General Public License for more details.
12 # You should have received a copy of the GNU General Public License
13 # along with this program. If not, see <http://www.gnu.org/licenses/>.
15 # Test that GDB doesn't lose control when a breakpoint is set at the
16 # same address as a dprintf.
20 if [prepare_for_testing "failed to prepare" \
21 ${testfile} ${srcfile} {debug}] {
25 set dp_location [gdb_get_line_number "set dprintf here"]
28 global gdb_prompt binfile dp_location
30 with_test_prefix "$style" {
31 clean_restart $binfile
34 fail "can't run to main"
40 gdb_test_no_output "set dprintf-style $style"
42 # Enable always-inserted so we can control the breakpoint
44 gdb_test_no_output "set breakpoint always-inserted on"
46 set test "set dprintf"
47 gdb_test_multiple "dprintf $dp_location, \"y=%d\\n\", y" $test {
48 -re "cannot run dprintf commands.*$gdb_prompt $" {
51 -re "Dprintf .* at .*$gdb_prompt $" {
56 # In case of agent style, this should force the target to
57 # report the trap to GDB. IOW, GDB should remove the commands
58 # from the target-side breakpoint.
59 gdb_test "break $dp_location" ".*" "set breakpoint"
61 gdb_test "continue" "set dprintf here.*"