~ chicken-core (chicken-5) 7ea3d35311964adbffce778e6322c97a4a611da5
commit 7ea3d35311964adbffce778e6322c97a4a611da5
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Wed Aug 29 14:54:30 2018 +0200
Commit: Evan Hanson <evhan@foldling.org>
CommitDate: Fri Aug 31 06:31:51 2018 +1200
For unsetting CHICKEN_REPOSITORY_PATH use "env -u" only when MSYSTEM is set
Signed-off-by: Evan Hanson <evhan@foldling.org>
diff --git a/tests/runtests.sh b/tests/runtests.sh
index a77a892d..6675bb0d 100755
--- a/tests/runtests.sh
+++ b/tests/runtests.sh
@@ -63,10 +63,14 @@ mkdir -p test-repository
cp $TYPESDB test-repository/types.db
echo "======================================== repository search path ..."
-export -p >./env.out
-unset CHICKEN_REPOSITORY_PATH
-$interpret -s repository-path-default.scm
-. ./env.out
+if test -z "$MSYSTEM"; then
+ export -p >./env.out
+ unset CHICKEN_REPOSITORY_PATH
+ $interpret -s repository-path-default.scm
+ . ./env.out
+else
+ env -u CHICKEN_REPOSITORY_PATH $interpret -s repository-path-default.scm
+fi
$compile_s sample-module.scm -j sample-module
cp sample-module.so $CHICKEN_INSTALL_REPOSITORY
cp sample-module.import.scm $CHICKEN_INSTALL_REPOSITORY
Trap