mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-04-29 19:30:36 +02:00
df04f5357a
Automake "strongly discourages" use of the serial driver, and switching to the preferred parallel driver allows make -j4 check to run in about half the time on a four core (not thread) host. * Makefile.am (TESTS, TESTS_ENVIRONMENT): run ./check-guile from test-suite/, not here. * check-guile.in: let test harness handle progress output. * configure.ac (AM_INIT_AUTOMAKE): allow parallel testing. * test-suite/Makefile.am (SCM_TESTS): remove non-tests. (EXTRA_DIST): move non-tests here. (TESTS): include SCM_TESTS (now driven from here). (TEST_EXTENSIONS): allow customization for .scm and .test. (TESTS_ENVIRONMENT): stop defining (user only). (AM_TESTS_ENVIRONMENT): replaces TESTS_ENVIRONMENT; drop guile. (SCM_LOG_COMPILER): run .scm tests via meta/guile. (AM_SCM_LOG_FLAGS): keep --no-auto-compile for .scm tests. (TEST_LOG_DRIVER): run .test tests via custom automake ./driver. * test-suite/driver: add automake test driver.
58 lines
1.4 KiB
Bash
Executable file
58 lines
1.4 KiB
Bash
Executable file
#!/bin/sh
|
|
|
|
set -ue
|
|
|
|
script_home="$(cd "$(dirname "$0")" && pwd)"
|
|
|
|
usage()
|
|
{
|
|
cat <<-EOF
|
|
Usage: driver [OPTION ...] -- TEST [ARG ...]
|
|
This is a test
|
|
Options:
|
|
--log-file PATH
|
|
--trs-file PATH
|
|
--color-tests (yes|no) currently ignored
|
|
--expect-failure (yes|no) currently ignored
|
|
--enable-hard-errors (yes|no) currently ignored
|
|
--test-name NAME currently ignored
|
|
|
|
This command provides an Automake parallel test harness
|
|
compatible driver for running TEST with Guile. This is
|
|
essentially an adapter for check-guile and it currently
|
|
assumes that check-guile is in the parent directory.
|
|
|
|
EOF
|
|
}
|
|
|
|
misuse() { usage 1>&2; exit 2; }
|
|
|
|
test_name=''
|
|
log_file=''
|
|
trs_file=''
|
|
|
|
while test $# -gt 0; do
|
|
case "$1" in
|
|
--test-name) test $# -gt 1 || misuse; test_name="$2"; shift 2 ;;
|
|
--log-file) test $# -gt 1 || misuse; log_file="$2"; shift 2 ;;
|
|
--trs-file) test $# -gt 1 || misuse; trs_file="$2"; shift 2 ;;
|
|
--color-tests|--expect-failure|--enable-hard-errors) shift 2 ;;
|
|
--) shift; break ;;
|
|
*) break ;;
|
|
esac
|
|
done
|
|
|
|
test "$test_name" || misuse
|
|
test "$log_file" || misuse
|
|
test "$trs_file" || misuse
|
|
|
|
test $# -gt 0 || misuse
|
|
program="$1"
|
|
shift
|
|
|
|
cd ..
|
|
|
|
exec ./check-guile \
|
|
--log-file "test-suite/$log_file" \
|
|
--trs-file "test-suite/$trs_file" \
|
|
"$(basename "$program")"
|