* lib/gdb.exp(gdb_expect): Declare errorInfo and errorCode

as global variables.
This commit is contained in:
Bob Manson 1997-06-17 20:11:04 +00:00
parent 0195767eaf
commit 17b59a7407
2 changed files with 7 additions and 0 deletions

View File

@ -1,3 +1,8 @@
Tue Jun 17 13:10:10 1997 Bob Manson <manson@charmed.cygnus.com>
* lib/gdb.exp(gdb_expect): Declare errorInfo and errorCode
as global variables.
Sat Jun 14 09:23:26 1997 Bob Manson <manson@charmed.cygnus.com>
* lib/gdb.exp: Close connection to remote host if gdb doesn't

View File

@ -877,6 +877,8 @@ proc gdb_expect { args } {
}
if {$code == 1} {
global errorInfo errorCode;
return -code error -errorinfo $errorInfo -errorcode $errorCode $string
} elseif {$code == 2} {
return -code return $string