+case "$HOST_TYPE" in
+ cmucl) LISP="lisp -batch"
+ INIT="-noinit"
+ CORE="-core"
+ ;;
+ sbcl) LISP="${XC_LISP:-sbcl}"
+ INIT="--no-sysinit --no-userinit"
+ CORE="--core"
+ ;;
+ clisp) LISP="clisp"
+ INIT="-norc"
+ CORE="-M"
+ ;;
+ openmcl)
+ LISP="openmcl"
+ INIT="-b"
+ CORE="-I"
+ ;;
+ *) echo unknown host type: "$HOST_TYPE"
+ echo should be one of "sbcl", "cmucl", or "clisp"
+ exit 1
+esac
+
+SBCL_XC_HOST="$LISP ${XC_CORE:+$CORE $XC_CORE} $INIT"
+export SBCL_XC_HOST