2003-11-28 Michael Chastain <mec.gnu@mindspring.com>
authorMichael Chastain <mec@google.com>
Tue, 2 Dec 2003 16:57:16 +0000 (16:57 +0000)
committerMichael Chastain <mec@google.com>
Tue, 2 Dec 2003 16:57:16 +0000 (16:57 +0000)
* gdb.objc/nondebug.exp: Match and KFAIL the output that comes
from current versions of gdb.  Clean up regular expressions.
Delete redundant timeout case.

gdb/testsuite/ChangeLog
gdb/testsuite/gdb.objc/nondebug.exp

index 6abfa24..b13f316 100644 (file)
@@ -1,3 +1,9 @@
+2003-11-28  Michael Chastain  <mec.gnu@mindspring.com>
+
+       * gdb.objc/nondebug.exp: Match and KFAIL the output that comes
+       from current versions of gdb.  Clean up regular expressions.
+       Delete redundant timeout case.
+
 2003-12-01  Michael Chastain  <mec.gnu@mindspring.com>
 
        Partial fix for PR testsuite/1456.
index af9add3..9c7a744 100644 (file)
@@ -63,12 +63,15 @@ do_objc_tests
 set name "break on non-debuggable method"
 gdb_test_multiple "break someMethod" $name \
 {
-    -re "\\\[0\\\] cancel.*\\\[1\\\] all.*\\\[2\\\]\[ \]+-.NonDebug someMethod.*\\\[3\\\]\[ \]+-.NonDebug2 someMethod.*" {
+    -re "\\\[0\\\] cancel\r\n\\\[1\\\] all\r\n\\\[2\\\]\[ \]+-.NonDebug someMethod.*\\\[3\\\]\[ \]+-.NonDebug2 someMethod.*" {
        send_gdb "2\n"
        exp_continue
     }
-    -re "Breakpoint \[0-9\]+ at 0x\[0-9a-f\]+.*" { pass $name }
+    -re "\\\[0\\\] cancel\r\n\\\[1\\\] all\r\n> " {
+       gdb_test "0" "" ""
+       kfail "gdb/1236" $name
+    }
+    -re "Breakpoint \[0-9\]+ at 0x\[0-9a-f\]+.*$gdb_prompt $" { pass $name }
     -re ".*$gdb_prompt $"   { kfail "gdb/1236" $name }
-    timeout                 { fail "$name (timeout)" }
 }