From 92daa43114b1a03c5ed64b8d59a1b40cc42b5bf8 Mon Sep 17 00:00:00 2001
From: Alex Shinn <alexshinn@gmail.com>
Date: Mon, 23 Jan 2017 23:12:25 +0900
Subject: [PATCH] allowing --noimage option to snow-chibi

---
 tools/snow-chibi | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/tools/snow-chibi b/tools/snow-chibi
index 87eaddf7..515fa4b5 100755
--- a/tools/snow-chibi
+++ b/tools/snow-chibi
@@ -1,13 +1,20 @@
 #!/bin/sh
 
 CHIBI=${CHIBI:-chibi-scheme}
+IMG=-isnow.img
 if [ -x ./chibi-scheme ] && ! type $CHIBI 2>/dev/null; then
     # convenience for running from dev, notable "make test-snow"
     CHIBI="./chibi-scheme"
     export LD_LIBRARY_PATH=".:${LD_LIBRARY_PATH}"
     export DYLD_LIBRARY_PATH=".:${DYLD_LIBRARY_PATH}"
 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)
 SNOW_SCRIPT=${SNOW_SCRIPT:-$SCRIPT_DIR/snow-chibi.scm}
 
-exec "${CHIBI}" -isnow.img "${SNOW_SCRIPT}" "$@"
+exec "${CHIBI}" $IMG "${SNOW_SCRIPT}" "$@"