From ca2fd88c9bac9ffec7ef5a721ff1be56e74a1ef4 Mon Sep 17 00:00:00 2001
From: Francois-Rene Rideau <tunes@google.com>
Date: Sun, 13 Apr 2014 23:19:40 -0400
Subject: [PATCH] Make lisp-invocation happier on allegro variants.

---
 test/run-tests.sh | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/test/run-tests.sh b/test/run-tests.sh
index 63d24a70..235a11c0 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
-- 
GitLab