Permalink
Browse files

1.0.31.10: run-sbcl.sh to support --core

 Thanks to Attila Lendvai.
  • Loading branch information...
1 parent 1ca4f69 commit bfd759c5fbfba4e1799cf4d06de0a0f349f06abd @nikodemus nikodemus committed Sep 15, 2009
Showing with 27 additions and 14 deletions.
  1. +26 −13 run-sbcl.sh
  2. +1 −1 version.lisp-expr
View
39 run-sbcl.sh
@@ -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
View
2 version.lisp-expr
@@ -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.