* 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:
parent
d894a6e99b
commit
b34b32e7f9
@ -1,3 +1,9 @@
|
||||
Mon Mar 27 08:00:34 1995 Jim Kingdon (kingdon@lioth.cygnus.com)
|
||||
|
||||
* 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.
|
||||
|
||||
Sun Mar 26 13:19:32 1995 Jim Kingdon (kingdon@lioth.cygnus.com)
|
||||
|
||||
* gdb.base/commands.exp (breakpoint_command_test): New tests.
|
||||
|
@ -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"
|
||||
|
Loading…
Reference in New Issue
Block a user