* lib/gdb.exp (default_gdb_version): A version number must start

with a digit, but other than that contains all characters up to
	the first whitespace character.
This commit is contained in:
Jim Kingdon 1995-03-27 16:05:08 +00:00
parent d894a6e99b
commit b34b32e7f9
2 changed files with 7 additions and 1 deletions

View file

@ -63,7 +63,7 @@ proc default_gdb_version {} {
global GDBFLAGS
if {[which $GDB] != 0} then {
set tmp [exec echo "q" | $GDB -nw $GDBFLAGS]
regexp " \[0-9.\]+" $tmp version
regexp " \[0-9\]\[^ \t\n\]+" $tmp version
clone_output "[which $GDB] version$version -nw $GDBFLAGS \n"
} else {
warning "$GDB does not exist"