49 lines
1.3 KiB
Bash
49 lines
1.3 KiB
Bash
|
#!/bin/bash
|
||
|
|
if [ $# -ne 2 -a $# -ne 1 ]; then
|
||
|
|
echo "Usage: test.sh [lean-executable-path] [yes/no]?"
|
||
|
|
exit 1
|
||
|
|
fi
|
||
|
|
ulimit -s unlimited
|
||
|
|
LEAN=$1
|
||
|
|
if [ $# -ne 2 ]; then
|
||
|
|
INTERACTIVE=no
|
||
|
|
else
|
||
|
|
INTERACTIVE=$2
|
||
|
|
fi
|
||
|
|
NUM_ERRORS=0
|
||
|
|
for f in `ls *.lean`; do
|
||
|
|
echo "-- testing $f"
|
||
|
|
cat config.lean $f | $LEAN --lean | tail -n +2 > $f.produced.out
|
||
|
|
if test -f $f.expected.out; then
|
||
|
|
if diff $f.produced.out $f.expected.out; then
|
||
|
|
echo "-- checked"
|
||
|
|
else
|
||
|
|
echo "ERROR: file $f.produced.out does not match $f.expected.out"
|
||
|
|
NUM_ERRORS=$(($NUM_ERRORS+1))
|
||
|
|
if [ $INTERACTIVE == "yes" ]; then
|
||
|
|
meld $f.produced.out $f.expected.out
|
||
|
|
if diff $f.produced.out $f.expected.out; then
|
||
|
|
echo "-- mismath was fixed"
|
||
|
|
fi
|
||
|
|
fi
|
||
|
|
fi
|
||
|
|
else
|
||
|
|
echo "ERROR: file $f.expected.out does not exist"
|
||
|
|
NUM_ERRORS=$(($NUM_ERRORS+1))
|
||
|
|
if [ $INTERACTIVE == "yes" ]; then
|
||
|
|
read -p "copy $f.produced.out (y/n)? "
|
||
|
|
if [ $REPLY == "y" ]; then
|
||
|
|
cp $f.produced.out $f.expected.out
|
||
|
|
echo "-- copied $f.produced.out --> $f.expected.out"
|
||
|
|
fi
|
||
|
|
fi
|
||
|
|
fi
|
||
|
|
done
|
||
|
|
if [ $NUM_ERRORS -gt 0 ]; then
|
||
|
|
echo "-- Number of errors: $NUM_ERRORS"
|
||
|
|
exit 1
|
||
|
|
else
|
||
|
|
echo "-- Passed"
|
||
|
|
exit 0
|
||
|
|
fi
|