[bpt/guile.git] / examples / modules / check.test

#!/bin/sh

# must be run from this directory
guile=${GUILE-../../libguile/guile}

if test "X$srcdir" = X; then
    srcdir=.
fi

set -e

#
# ./main test
#
$guile -s $srcdir/main > TMP
cat <<EOF | diff -u - TMP
module-0 foo
module-0 bar
module-1 foo
module-1 bar
module-2 braz
module-2 braz
module-2 foo
EOF
rm -f TMP

# check.test ends here
Commit	Line	Data
024001c2 MG	1	#!/bin/sh
	2
	3	# must be run from this directory
	4	guile=${GUILE-../../libguile/guile}
	5
	6	if test "X$srcdir" = X; then
	7	srcdir=.
	8	fi
	9
	10	set -e
	11
	12	#
	13	# ./main test
	14	#
	15	$guile -s $srcdir/main > TMP
	16	cat <<EOF \| diff -u - TMP
	17	module-0 foo
	18	module-0 bar
	19	module-1 foo
	20	module-1 bar
	21	module-2 braz
	22	module-2 braz
	23	module-2 foo
	24	EOF
	25	rm -f TMP
	26
	27	# check.test ends here