allowing --noimage option to snow-chibi

This commit is contained in:
Alex Shinn 2017-01-23 23:12:25 +09:00
parent d1eaf80ce8
commit 92daa43114

View file

@ -1,13 +1,20 @@
#!/bin/sh #!/bin/sh
CHIBI=${CHIBI:-chibi-scheme} CHIBI=${CHIBI:-chibi-scheme}
IMG=-isnow.img
if [ -x ./chibi-scheme ] && ! type $CHIBI 2>/dev/null; then if [ -x ./chibi-scheme ] && ! type $CHIBI 2>/dev/null; then
# convenience for running from dev, notable "make test-snow" # convenience for running from dev, notable "make test-snow"
CHIBI="./chibi-scheme" CHIBI="./chibi-scheme"
export LD_LIBRARY_PATH=".:${LD_LIBRARY_PATH}" export LD_LIBRARY_PATH=".:${LD_LIBRARY_PATH}"
export DYLD_LIBRARY_PATH=".:${DYLD_LIBRARY_PATH}" export DYLD_LIBRARY_PATH=".:${DYLD_LIBRARY_PATH}"
fi fi
if [ "x$1" = "x--noimage" ]; then
shift
IMG=""
elif ! $CHIBI $IMG -e1 >/dev/null 2>/dev/null; then
IMG=""
fi
SCRIPT_DIR=$(dirname $0) SCRIPT_DIR=$(dirname $0)
SNOW_SCRIPT=${SNOW_SCRIPT:-$SCRIPT_DIR/snow-chibi.scm} SNOW_SCRIPT=${SNOW_SCRIPT:-$SCRIPT_DIR/snow-chibi.scm}
exec "${CHIBI}" -isnow.img "${SNOW_SCRIPT}" "$@" exec "${CHIBI}" $IMG "${SNOW_SCRIPT}" "$@"