8a70568066
Code in `unit_start()' and `completion_start()' is merged and put central in lib/library.exp: - start_bash() - source_bash_completion() - init_tcl_bash_globals() Global string variable `bash_versinfo_0' is replaced with list variable `BASH_VERSINFO'.
20 lines
282 B
Plaintext
20 lines
282 B
Plaintext
source lib/library.exp
|
|
|
|
|
|
proc unit_exit {} {
|
|
# Exit bash
|
|
send "\rexit\r"
|
|
}; # unit_exit()
|
|
|
|
|
|
proc unit_start {} {
|
|
start_bash
|
|
source_bash_completion
|
|
init_tcl_bash_globals
|
|
}; # unit_start()
|
|
|
|
|
|
proc unit_version {} {
|
|
puts "$::TESTDIR, bash-$::BASH_VERSION"
|
|
}
|