Fix races in mi2-var-display.exp.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 8d07e4a..d60370f 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,10 @@
 2011-06-23  Marek Polacek  <mpolacek@redhat.com>
 
+       * gdb.mi/mi2-var-display.exp: Replace gdb_test_multiple with
+       mi_gdb_test.
+
+2011-06-23  Marek Polacek  <mpolacek@redhat.com>
+
        * gdb.mi/mi2-return.exp: Replace gdb_test_multiple with mi_gdb_test.
 
 2011-06-23  Marek Polacek  <mpolacek@redhat.com>
@@ -141,7 +146,7 @@
 
 2011-05-27  Marek Polacek  <mpolacek@redhat.com>
 
-        * gdb.mi/mi-nonstop.exp: Replace gdb_test_multiple with mi_gdb_test.
+       * gdb.mi/mi-nonstop.exp: Replace gdb_test_multiple with mi_gdb_test.
 
 2011-05-27  Marek Polacek  <mpolacek@redhat.com>
 

diff --git a/gdb/testsuite/gdb.mi/mi2-var-display.exp b/gdb/testsuite/gdb.mi/mi2-var-display.exp
index 6390698..828614b 100644 (file)
--- a/gdb/testsuite/gdb.mi/mi2-var-display.exp
+++ b/gdb/testsuite/gdb.mi/mi2-var-display.exp
@@ -604,12 +604,8 @@ mi_gdb_test "-var-list-children anone" \
 
 
 # Record fp
-
-gdb_test_multiple "p/x \$fp" "print FP register" {
-    -re ".*($hex).*\\^done\r\n$mi_gdb_prompt$" { 
-       pass "print FP register"
-       set fp $expect_out(1,string) 
-    }
+if ![mi_gdb_test "p/x \$fp" ".*($hex).*\\^done" "print FP register"] {
+    set fp $expect_out(3,string) 
 }
 
 mi_continue_to "incr_a"