X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=slam.sh;h=202c8aa29d827e71695efed5e52ceb28108e8a48;hb=ba008a77f32b2ef30e8492757afb8b54731c76cf;hp=7f6987f0f9c0907b2df2fcd969aed883643e65bf;hpb=371577a214ce2659c271279ad48e4c42e1c0c93e;p=sbcl.git

diff --git a/slam.sh b/slam.sh
index 7f6987f..202c8aa 100644
--- a/slam.sh
+++ b/slam.sh
@@ -79,8 +79,8 @@ case "$HOST_TYPE" in
            INIT="-noinit"
            CORE="-core"
            ;;
-    sbcl)  LISP="sbcl"
-           INIT="--sysinit version.lisp-expr --userinit version.lisp-expr"
+    sbcl)  LISP="${XC_LISP:-sbcl}"
+           INIT="--no-sysinit --no-userinit"
            CORE="--core"
            ;;
     clisp) LISP="clisp"
@@ -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