Freddy Vulto de51dd3a89 (testsuite) Prepend relative files with $::srcdir
in an attempt to be able to run the tests successfully from within
autotools' `make distcheck'.
2010-11-05 21:28:48 +01:00

26 lines
356 B
Plaintext

source $::srcdir/lib/library.exp
proc unit_exit {} {
# Exit bash
send "\rexit\r"
}
proc unit_init {test_file_name} {
# Call unit_start() only once
if {! [info exists ::BASH_VERSINFO]} {
unit_start
}
}
proc unit_start {} {
start_interactive_test
}
proc unit_version {} {
puts "$::TESTDIR, bash-$::BASH_VERSION"
}