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:
parent
96f151a4f8
commit
6118be808c
@ -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"
|
||||
|
@ -1,4 +1,4 @@
|
||||
#!/bin/sh
|
||||
|
||||
BASEDIR=$(dirname ${0})
|
||||
${BASEDIR}/../../lib/test_fileutils >&-
|
||||
TESTPROG=${1}
|
||||
${TESTPROG} >&-
|
||||
|
@ -1,4 +1,4 @@
|
||||
#!/bin/sh
|
||||
|
||||
BASEDIR=$(dirname ${0})
|
||||
${BASEDIR}/../../lib/test_fileutils > /dev/full
|
||||
TESTPROG=${1}
|
||||
${TESTPROG} >/dev/full
|
||||
|
Loading…
Reference in New Issue
Block a user