From 02c1bee5562dd8a013484aa65baa8b301ed0f547 Mon Sep 17 00:00:00 2001 From: Francois-Rene Rideau <fare@tunes.org> Date: Sat, 27 Feb 2010 19:11:58 -0500 Subject: [PATCH] Don't bork silently but error out loudly, when lisp is not found or not supported. --- test/run-tests.sh | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/test/run-tests.sh b/test/run-tests.sh index a170ec7b..837f55a6 100755 --- a/test/run-tests.sh +++ b/test/run-tests.sh @@ -99,6 +99,7 @@ if [ -z $1 ] ; then lisp="sbcl" fi +command= case "$lisp" in sbcl) if type sbcl ; then @@ -161,12 +162,21 @@ case "$lisp" in lispworks) if type lispworks ; then fasl_ext="ofasl" - command=`which ecl` + command=`which lispworks` command="$command -siteinit - -init -" eval="-eval" fi ;; + *) + echo "Unsupported lisp: $1" >&2 + echo "Please add support to run-tests.sh" >&2 + exit 42 ;; esac +if [ -z "$command" ] ; then + echo "lisp implementation not found: $1" >&2 + exit 43 +fi + if [ -z "${DEBUG_ASDF_TEST}" ] ; then command="$command $nodebug" fi -- GitLab