1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-11 22:31:12 +02:00

Add check for guile interpreter.

Fix bug: Use `$guile' everywhere.  Thanks to Martin Grabmueller.
This commit is contained in:
Thien-Thi Nguyen 2001-07-17 06:44:21 +00:00
parent 8ae7ecf74e
commit e13743b80a

View file

@ -2,6 +2,14 @@
# must be run from this directory
guile=${GUILE-../../libguile/guile}
if [ -x $guile ] ; then
:
else
echo could not find guile interpreter.
echo '(are you running this script from' `dirname $0` '?)'
echo GUILE env var: ${GUILE-not set}
exit 1
fi
set -e
@ -36,6 +44,6 @@ rm -f TMP
#
# fact
#
case `guile -s fact 5` in 120) ;; *) echo $0: error: fact 5 ;; esac
case `$guile -s fact 5` in 120) ;; *) echo $0: error: fact 5 ;; esac
# check.test ends here