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:
parent
8ae7ecf74e
commit
e13743b80a
1 changed files with 9 additions and 1 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue