diff options
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 7 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/a1-selftest.exp | 9 |
2 files changed, 11 insertions, 5 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 41b8f38..73e5095 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,10 @@ +Mon Feb 3 12:09:37 1997 Bob Manson <manson@charmed.cygnus.com> + + * gdb.base/a1-selftest.exp: Make sure we call gdb_exit before + trying to delete the copy of gdb. Catch the file delete so we + don't die if the delete fails; also, the file should be copied to + the host, not to the build. + Sun Feb 2 00:55:14 1997 Bob Manson <manson@charmed.cygnus.com> * lib/gdb.exp(gdb_test): Surround the result pattern with diff --git a/gdb/testsuite/gdb.base/a1-selftest.exp b/gdb/testsuite/gdb.base/a1-selftest.exp index 35c86fb..128e302 100644 --- a/gdb/testsuite/gdb.base/a1-selftest.exp +++ b/gdb/testsuite/gdb.base/a1-selftest.exp @@ -373,14 +373,12 @@ GDB.*Copyright \[0-9\]+ Free Software Foundation, Inc..*$gdb_prompt $"\ } } - gdb_exit # Set the timeout back to the value it had when we were called. set timeout $oldtimeout verbose "Timeout is now $timeout seconds" 2 # Restart gdb in case next test expects it to be started already. - gdb_start return 0 } @@ -414,12 +412,13 @@ proc find_gdb { arg } { set GDB_FULLPATH [find_gdb $GDB] # Remove any old copy lying around. -remote_file build delete x$tool +remote_file host delete x$tool gdb_start -set file [remote_download build $GDB_FULLPATH x$tool] +set file [remote_download host $GDB_FULLPATH x$tool] set result [test_with_self $file]; -remote_file build delete $file; +gdb_exit; +catch "remote_file host delete $file"; if {$result <0} then { warning "Couldn't test self" |