misc: testsuite to source aux scripts correctly

Because I don't know how to redirect properly in tcl, there are
some small scripts that do this for me. With your standard
make check, all is good because the scripts and the binary are
in the usual spots.

make distcheck however puts them all over the place. The binary is
in a different tree to the test and aux scripts. The change now
tells where aux script where its binary is.
This commit is contained in:
Craig Small 2016-07-10 09:04:44 +10:00
parent 96f151a4f8
commit 6118be808c
3 changed files with 11 additions and 10 deletions

View File

@ -2,18 +2,19 @@
# Testsuite for lib/fileutils program
#
set noarg "${topdir}lib/test_fileutils"
set testprog "${topdir}lib/test_fileutils"
set scriptdir [file dirname [ info script ]]
set test "without argument"
spawn $noarg
spawn $testprog
expect_pass "$test" "Hello, World!"
set badfd "${topdir}testsuite/lib.test/fileutils_badfd.sh"
set badfd "${scriptdir}/fileutils_badfd.sh"
set test "test bad file descriptor"
spawn $badfd
spawn $badfd $testprog
expect_pass "$test" "test_fileutils: write error: Bad file descriptor"
set full "${topdir}testsuite/lib.test/fileutils_full.sh"
set full "${scriptdir}/fileutils_full.sh"
set test "test no space left on device"
spawn $full
spawn $full $testprog
expect_pass "$test" "test_fileutils: write error: No space left on device"

View File

@ -1,4 +1,4 @@
#!/bin/sh
BASEDIR=$(dirname ${0})
${BASEDIR}/../../lib/test_fileutils >&-
TESTPROG=${1}
${TESTPROG} >&-

View File

@ -1,4 +1,4 @@
#!/bin/sh
BASEDIR=$(dirname ${0})
${BASEDIR}/../../lib/test_fileutils > /dev/full
TESTPROG=${1}
${TESTPROG} >/dev/full