Skip to content

Commit

Permalink
1.0.31.10: run-sbcl.sh to support --core
Browse files Browse the repository at this point in the history
 Thanks to Attila Lendvai.
  • Loading branch information
nikodemus committed Sep 15, 2009
1 parent 1ca4f69 commit bfd759c
Show file tree
Hide file tree
Showing 2 changed files with 27 additions and 14 deletions.
39 changes: 26 additions & 13 deletions run-sbcl.sh
Original file line number Diff line number Diff line change
Expand Up @@ -13,22 +13,35 @@

set -e

if [ "$1" = "--help" ]; then
echo "usage: run-sbcl.sh sbcl-options*"
echo
echo "Runs SBCL from the build directory or binary tarball without need for"
echo "installation. Except for --help and --core, accepts all the same"
echo "command-line options as SBCL does."
echo
exit 1
fi

BASE=`dirname "$0"`
CORE_DEFINED=no

for arg in $*; do
case $arg in
(--core)
CORE_DEFINED=yes
;;
(--help)
echo "usage: run-sbcl.sh sbcl-options*"
echo
echo "Runs SBCL from the build directory or binary tarball without need for"
echo "installation. Except for --help, accepts all the same command-line options"
echo "as SBCL does."
echo
exit 1
;;
esac
done

ARGUMENTS=""

if [ "$CORE_DEFINED" = "no" ]; then
ARGUMENTS="--core "$BASE"/output/sbcl.core"
fi

if [ -x "$BASE"/src/runtime/sbcl -a -f "$BASE"/output/sbcl.core ]; then
echo "(running SBCL from: $BASE)"
SBCL_HOME="$BASE"/contrib \
"$BASE"/src/runtime/sbcl --core "$BASE"/output/sbcl.core "$@"
echo "(running SBCL from: `pwd`)"
SBCL_HOME="$BASE"/contrib "$BASE"/src/runtime/sbcl $ARGUMENTS "$@"
else
echo "No built SBCL here ($BASE): run 'sh make.sh' first!"
exit 1
Expand Down
2 changes: 1 addition & 1 deletion version.lisp-expr
Original file line number Diff line number Diff line change
Expand Up @@ -17,4 +17,4 @@
;;; checkins which aren't released. (And occasionally for internal
;;; versions, especially for internal versions off the main CVS
;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
"1.0.31.9"
"1.0.31.10"

0 comments on commit bfd759c

Please sign in to comment.