1 # Copyright 2011-2021 Free Software Foundation, Inc.
3 # This program is free software; you can redistribute it and/or modify
4 # it under the terms of the GNU General Public License as published by
5 # the Free Software Foundation; either version 3 of the License, or
6 # (at your option) any later version.
8 # This program is distributed in the hope that it will be useful,
9 # but WITHOUT ANY WARRANTY; without even the implied warranty of
10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 # GNU General Public License for more details.
13 # You should have received a copy of the GNU General Public License
14 # along with this program. If not, see <http://www.gnu.org/licenses/>.
16 if [target_info exists gdb,no_hardware_watchpoints] {
20 if { ![support_displaced_stepping] } {
21 unsupported "displaced stepping"
25 load_lib mi-support.exp
28 proc mi_nonstop_resume { command test } {
29 if { [mi_send_resuming_command $command $test] != 0 } {
30 # If a resume fails, assume non-stop is broken or unsupported
31 # for this target. We have logged a FAIL or UNSUPPORTED; skip
32 # the remaining tests to limit timeouts.
40 standard_testfile watch-nonstop.c
42 if {[gdb_compile "$srcdir/$subdir/$srcfile" $binfile executable {debug}] != "" } {
46 save_vars { GDBFLAGS } {
47 append GDBFLAGS " -ex \"set non-stop on\""
48 mi_clean_restart $binfile
51 mi_gdb_test "-gdb-set mi-async 1" ".*"
54 if { [mi_runto_main] < 0 } {
59 mi_gdb_test "111-break-watch global" \
60 "111\\^done,wpt=\{number=\"2\",exp=\"global\"\}" \
61 "break-watch operation"
63 # Set the target running.
64 mi_nonstop_resume "exec-continue" "resume 1"
66 # Now try deleting the watchpoint. This would fail with "Couldn't
67 # write debug register: No such process." on GNU/Linux, because we'd
68 # try to poke at the debug registers of a running thread.
69 mi_gdb_test "777-break-delete 2" \