Fix make-array transforms.

[sbcl.git] / slam.sh

diff --git a/slam.sh b/slam.sh
index 63108f3..202c8aa 100644 (file)
--- a/slam.sh
+++ b/slam.sh
@@ -79,7 +79,7 @@ case "$HOST_TYPE" in
            INIT="-noinit"
            CORE="-core"
            ;;
-    sbcl)  LISP="sbcl"
+    sbcl)  LISP="${XC_LISP:-sbcl}"
            INIT="--no-sysinit --no-userinit"
            CORE="--core"
            ;;
@@ -97,7 +97,7 @@ case "$HOST_TYPE" in
            exit 1
 esac
 
-SBCL_XC_HOST="$LISP $INIT"
+SBCL_XC_HOST="$LISP ${XC_CORE:+$CORE $XC_CORE} $INIT"
 export SBCL_XC_HOST
 
 # (We don't do make-host-1.sh at all. Hopefully nothing relevant has