* gdb.base/watchpoints.exp: Respect gdb,no_hardware_watchpoints
authorUlrich Weigand <uweigand@de.ibm.com>
Tue, 29 Sep 2009 13:02:58 +0000 (13:02 +0000)
committerUlrich Weigand <uweigand@de.ibm.com>
Tue, 29 Sep 2009 13:02:58 +0000 (13:02 +0000)
target_info setting.

* gdb.threads/thread-specific.exp (get_thread_list): Support targets
that detect new threads during "info threads".

gdb/testsuite/ChangeLog
gdb/testsuite/gdb.base/watchpoints.exp
gdb/testsuite/gdb.threads/thread-specific.exp

index 407832e..e83c0fc 100644 (file)
@@ -1,3 +1,11 @@
+2009-09-29  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
+
+       * gdb.base/watchpoints.exp: Respect gdb,no_hardware_watchpoints
+       target_info setting.
+
+       * gdb.threads/thread-specific.exp (get_thread_list): Support targets
+       that detect new threads during "info threads".
+
 2009-09-27  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
 
        * gdb.threads/manythreads.c (main): Increase thread stack size
index 7abe14b..616de13 100644 (file)
@@ -45,6 +45,11 @@ gdb_start
 gdb_reinitialize_dir $srcdir/$subdir
 gdb_load $binfile
 
+    # Disable hardware watchpoints if necessary.
+    if [target_info exists gdb,no_hardware_watchpoints] {
+        gdb_test "set can-use-hw-watchpoints 0" "" ""
+    }
+
     runto_main
     gdb_test "watch ival1" "" ""
     gdb_test "watch ival3" "" ""
index 775940b..30e1a43 100644 (file)
@@ -43,6 +43,9 @@ proc get_thread_list { } {
     -re "info threads\r\n" {
       exp_continue
     }
+    -re "New Thread \[^\n\]*\n" {
+      exp_continue
+    }
     -re "^\\*  *(\[0-9\]*) Thread \[^\n\]*main\[^\n\]*\n" {
       set thr_list "$expect_out(1,string) $thr_list"
       exp_continue