aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite
diff options
context:
space:
mode:
authorBob Manson <manson@cygnus>1997-07-04 01:04:45 +0000
committerBob Manson <manson@cygnus>1997-07-04 01:04:45 +0000
commit9039701bda1d0ab513c2abed287b27bd7293cc57 (patch)
treefd83e56a599c718e45a8f575b190f9c9e57b34c1 /gdb/testsuite
parent87910097ba1c058ec692808f4d3712b93cb72be3 (diff)
downloadgdb-9039701bda1d0ab513c2abed287b27bd7293cc57.zip
gdb-9039701bda1d0ab513c2abed287b27bd7293cc57.tar.gz
gdb-9039701bda1d0ab513c2abed287b27bd7293cc57.tar.bz2
* lib/gdb.exp(get_debug_format): Don't cause the testsuite to fail
if we can't get a debug format from GDB (we may be testing an older GDB). Use a 10 second timeout when checking for the format. * gdb.stabs/weird.exp: Fix quoting.
Diffstat (limited to 'gdb/testsuite')
-rw-r--r--gdb/testsuite/ChangeLog6
-rw-r--r--gdb/testsuite/lib/gdb.exp14
2 files changed, 15 insertions, 5 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 78242dc..6c7836d 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,11 @@
Thu Jul 3 15:35:12 1997 Bob Manson <manson@charmed.cygnus.com>
+ * lib/gdb.exp(get_debug_format): Don't cause the testsuite to fail
+ if we can't get a debug format from GDB (we may be testing an
+ older GDB). Use a 10 second timeout when checking for the format.
+
+ * gdb.stabs/weird.exp: Fix quoting.
+
* config/sparclet.exp: Renamed sparclet-loader.c to stub-loader.c.
Mon Jun 30 18:31:43 1997 Bob Manson <manson@charmed.cygnus.com>
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp
index 250f952..eb37fd5 100644
--- a/gdb/testsuite/lib/gdb.exp
+++ b/gdb/testsuite/lib/gdb.exp
@@ -988,19 +988,23 @@ proc get_debug_format { } {
set debug_format "unknown"
send_gdb "info source\n"
- gdb_expect {
- -re ".*Compiled with (.*) debugging format.\r\n$gdb_prompt $" {
+ gdb_expect 10 {
+ -re "Compiled with (.*) debugging format.\r\n$gdb_prompt $" {
set debug_format $expect_out(1,string)
verbose "debug format is $debug_format"
return 1;
}
- -re ".*No current source file.\r\n$gdb_prompt $" {
+ -re "No current source file.\r\n$gdb_prompt $" {
perror "get_debug_format used when no current source file"
return 0;
}
+ -re "$gdb_prompt $" {
+ warning "couldn't check debug format (no valid response)."
+ return 1;
+ }
timeout {
- perror "couldn't check debug format (timed out)."
- return 0;
+ warning "couldn't check debug format (timed out)."
+ return 1;
}
}
}