diff --git a/test/run-tests.sh b/test/run-tests.sh
index 63d24a7009c582e84b17398f19d64e20407137c7..235a11c0e2cb097225b1db38c8739c0d0e63d440 100755
--- a/test/run-tests.sh
+++ b/test/run-tests.sh
@@ -218,6 +218,8 @@ case "$lisp" in
       allegromodern_64_s) command="${ALLEGROMODERN_64_S:-mlisp_64_s}" ;;
       allegromodern8_64_s) command="${ALLEGROMODERN8_64_S:-mlisp8_64_s}" ;;
     esac
+    # For the sake of the lisp-invocation library, re-export these
+    ALLEGRO=$command ; export ALLEGRO
     flags="-q"
     nodebug="-batch"
     if [ "$os" = windows ] && [ -z "$ALLEGRO_NOISY" ] ; then bcmd="$command +c $flags" ; fi