mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2025-02-11 13:02:10 +08:00
gdb/testsuite/
Fix gdb.base/macscp.exp when using custom inputrc. * gdb.base/completion.exp: Remove env(INPUTRC) set and restore. * gdb.base/readline.exp: Remove env(INPUTRC) set and restore. Remove env(TERM) set. * gdb.cp/cpcompletion.exp: Remove env(INPUTRC) set. * lib/gdb.exp (default_gdb_start): Add env(INPUTRC) and env(TERM) set.
This commit is contained in:
parent
aa81e255f3
commit
4662c76e91
@ -1,3 +1,12 @@
|
||||
2009-07-13 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||
|
||||
Fix gdb.base/macscp.exp when using custom inputrc.
|
||||
* gdb.base/completion.exp: Remove env(INPUTRC) set and restore.
|
||||
* gdb.base/readline.exp: Remove env(INPUTRC) set and restore. Remove
|
||||
env(TERM) set.
|
||||
* gdb.cp/cpcompletion.exp: Remove env(INPUTRC) set.
|
||||
* lib/gdb.exp (default_gdb_start): Add env(INPUTRC) and env(TERM) set.
|
||||
|
||||
2009-07-13 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||
|
||||
Fix racy clashing of output files for gdb.base{1,2}/ parallel run.
|
||||
|
@ -85,18 +85,6 @@ if [get_compiler_info ${binfile}] {
|
||||
|
||||
gdb_exit
|
||||
|
||||
# Don't let a .inputrc file or an existing setting of INPUTRC mess up
|
||||
# the test results. Even if /dev/null doesn't exist on the particular
|
||||
# platform, the readline library will use the default setting just by
|
||||
# failing to open the file. OTOH, opening /dev/null successfully will
|
||||
# also result in the default settings being used since nothing will be
|
||||
# read from this file.
|
||||
global env
|
||||
if [info exists env(INPUTRC)] {
|
||||
set old_inputrc $env(INPUTRC)
|
||||
}
|
||||
set env(INPUTRC) "/dev/null"
|
||||
|
||||
gdb_start
|
||||
gdb_reinitialize_dir $srcdir/$subdir
|
||||
gdb_load ${binfile}
|
||||
@ -863,11 +851,6 @@ gdb_expect {
|
||||
}
|
||||
|
||||
# Restore globals modified in this test...
|
||||
if [info exists old_inputrc] {
|
||||
set env(INPUTRC) $old_inputrc
|
||||
} else {
|
||||
unset env(INPUTRC)
|
||||
}
|
||||
set timeout $oldtimeout1
|
||||
|
||||
return 0
|
||||
|
@ -146,26 +146,6 @@ if $tracelevel {
|
||||
strace $tracelevel
|
||||
}
|
||||
|
||||
# Don't let a .inputrc file or an existing setting of INPUTRC mess up
|
||||
# the test results. Even if /dev/null doesn't exist on the particular
|
||||
# platform, the readline library will use the default setting just by
|
||||
# failing to open the file. OTOH, opening /dev/null successfully will
|
||||
# also result in the default settings being used since nothing will be
|
||||
# read from this file.
|
||||
global env
|
||||
if [info exists env(INPUTRC)] {
|
||||
set old_inputrc $env(INPUTRC)
|
||||
}
|
||||
set env(INPUTRC) "/dev/null"
|
||||
|
||||
# The arrow key test relies on the standard VT100 bindings, so make
|
||||
# sure that an appropriate terminal is selected. The same bug
|
||||
# doesn't show up if we use ^P / ^N instead.
|
||||
if [info exists env(TERM)] {
|
||||
set old_term $env(TERM)
|
||||
}
|
||||
set env(TERM) "vt100"
|
||||
|
||||
gdb_start
|
||||
gdb_reinitialize_dir $srcdir/$subdir
|
||||
|
||||
@ -221,11 +201,6 @@ operate_and_get_next "Simple operate-and-get-next" \
|
||||
|
||||
|
||||
# Restore globals modified in this test...
|
||||
if [info exists old_inputrc] {
|
||||
set env(INPUTRC) $old_inputrc
|
||||
} else {
|
||||
unset env(INPUTRC)
|
||||
}
|
||||
if [info exists old_gdbhistfile] {
|
||||
set env(GDBHISTFILE) $old_gdbhistfile
|
||||
} else {
|
||||
|
@ -36,18 +36,6 @@ if {[gdb_compile "${testfile}.o" ${binfile} executable {c++ debug}] != "" } {
|
||||
|
||||
gdb_exit
|
||||
|
||||
# Don't let a .inputrc file or an existing setting of INPUTRC mess up
|
||||
# the test results. Even if /dev/null doesn't exist on the particular
|
||||
# platform, the readline library will use the default setting just by
|
||||
# failing to open the file. OTOH, opening /dev/null successfully will
|
||||
# also result in the default settings being used since nothing will be
|
||||
# read from this file.
|
||||
global env
|
||||
if [info exists env(INPUTRC)] {
|
||||
set old_inputrc $env(INPUTRC)
|
||||
}
|
||||
set env(INPUTRC) "/dev/null"
|
||||
|
||||
gdb_start
|
||||
gdb_reinitialize_dir $srcdir/$subdir
|
||||
gdb_load ${binfile}
|
||||
|
@ -1172,6 +1172,19 @@ proc default_gdb_start { } {
|
||||
|
||||
set env(LC_CTYPE) C
|
||||
|
||||
# Don't let a .inputrc file or an existing setting of INPUTRC mess up
|
||||
# the test results. Even if /dev/null doesn't exist on the particular
|
||||
# platform, the readline library will use the default setting just by
|
||||
# failing to open the file. OTOH, opening /dev/null successfully will
|
||||
# also result in the default settings being used since nothing will be
|
||||
# read from this file.
|
||||
set env(INPUTRC) "/dev/null"
|
||||
|
||||
# The gdb.base/readline.exp arrow key test relies on the standard VT100
|
||||
# bindings, so make sure that an appropriate terminal is selected.
|
||||
# The same bug doesn't show up if we use ^P / ^N instead.
|
||||
set env(TERM) "vt100"
|
||||
|
||||
verbose "Spawning $GDB $INTERNAL_GDBFLAGS $GDBFLAGS"
|
||||
|
||||
if [info exists gdb_spawn_id] {
|
||||
|
Loading…
Reference in New Issue
Block a user