X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fsubr.sh;h=8d1d1be46bff7a8ba41bba01f21f33504207bc19;hb=cf49f2d086069a9c1b57f501df9a6a0bd3a34c3c;hp=8980035eb98148d7f1f94407346ad29260838160;hpb=c0569c5f51a82fcd5c6c1bc889e66c8e1c130c71;p=sbcl.git

diff --git a/tests/subr.sh b/tests/subr.sh
index 8980035..8d1d1be 100644
--- a/tests/subr.sh
+++ b/tests/subr.sh
@@ -26,14 +26,14 @@ set -u
 set -a # export all variables at assignment-time.
 # Note: any script that uses the variables that name files should
 # quote them (with double quotes), to contend with whitespace.
-SBCL_HOME="${TEST_SBCL_HOME:-$SBCL_PWD/../contrib}"
+SBCL_HOME="${TEST_SBCL_HOME:-$SBCL_PWD/../obj/sbcl-home}"
 SBCL_CORE="${TEST_SBCL_CORE:-$SBCL_PWD/../output/sbcl.core}"
 SBCL_RUNTIME="${TEST_SBCL_RUNTIME:-$SBCL_PWD/../src/runtime/sbcl}"
 SBCL_ARGS="${TEST_SBCL_ARGS:---noinform --no-sysinit --no-userinit --noprint --disable-debugger}"
 
 # Scripts that use these variables should quote them.
-TEST_BASENAME="`basename $0`"
-TEST_FILESTEM="$(basename "${TEST_BASENAME}" | sed 's/\.sh$// ; s/\./-/g')"
+TEST_BASENAME=`basename $0`
+TEST_FILESTEM=`basename "${TEST_BASENAME}" | sed -e 's/\.sh$//' -e 's/\./-/g'`
 : ${TEST_BASEDIR:="$SBCL_PWD"}
 TEST_DIRECTORY="${TEST_BASEDIR}/${TEST_FILESTEM}-$$"
 export TEST_DIRECTORY