diff options
Diffstat (limited to 'gdb/testsuite/gdb.base/completion.exp')
| -rw-r--r-- | gdb/testsuite/gdb.base/completion.exp | 34 |
1 files changed, 20 insertions, 14 deletions
diff --git a/gdb/testsuite/gdb.base/completion.exp b/gdb/testsuite/gdb.base/completion.exp index 9fa44c0..8c8f676 100644 --- a/gdb/testsuite/gdb.base/completion.exp +++ b/gdb/testsuite/gdb.base/completion.exp @@ -72,6 +72,19 @@ 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} @@ -596,19 +609,12 @@ gdb_expect { timeout { fail "(timeout) complete 'set follow-fork-mode'" } } +# 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 - - - - - - - - - - - - - +return 0 |