2013-11-18 20:49:57 +00:00
|
|
|
#!/bin/sh
|
|
|
|
# Test is all examples in the .md files are working
|
|
|
|
if [ $# -ne 1 ]; then
|
2013-11-20 00:47:47 +00:00
|
|
|
echo "Usage: test.sh [lean-executable-path]"
|
2013-11-18 20:49:57 +00:00
|
|
|
exit 1
|
|
|
|
fi
|
|
|
|
ulimit -s unlimited
|
2013-11-20 00:47:47 +00:00
|
|
|
LEAN=$1
|
2013-11-18 20:49:57 +00:00
|
|
|
NUM_ERRORS=0
|
|
|
|
for f in `ls *.md`; do
|
|
|
|
echo "-- testing $f"
|
2013-11-19 21:25:42 +00:00
|
|
|
awk 'BEGIN{ in_block = 0 } !/```/{ if (in_block == 1) print $0; else print "" } /```/ && !/```lua/{ in_block = 0; print "" } /```lua/{ in_block = 1; print "" }' $f > $f.lua
|
2013-11-20 00:47:47 +00:00
|
|
|
if $LEAN $f.lua > $f.produced.out; then
|
2013-11-18 20:49:57 +00:00
|
|
|
echo "-- worked"
|
|
|
|
else
|
|
|
|
echo "ERROR executing $f.lua, produced output is at $f.produced.out"
|
|
|
|
NUM_ERRORS=$(($NUM_ERRORS+1))
|
|
|
|
fi
|
|
|
|
done
|
|
|
|
if [ $NUM_ERRORS -gt 0 ]; then
|
|
|
|
echo "-- Number of errors: $NUM_ERRORS"
|
|
|
|
exit 1
|
|
|
|
else
|
|
|
|
echo "-- Passed"
|
|
|
|
exit 0
|
|
|
|
fi
|