Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

executable file 161 lines (135 sloc) 3.99 kB
#!/bin/sh
# Flags:
# --no-clean: don't make clean first, just carry on from
# a previous interrupted validation run
# --testsuite-only: don't build the compiler, just run
# the test suite
# --hpc: build stage2 with -fhpc, and see how much of the
# compiler the test suite covers.
# 2008-07-01: 63% slower than the default.
# HTML generated here: testsuite/hpc_output/hpc_index.html
# --fast: Default. Opposite to --slow.
# --slow: Build stage2 with -DDEBUG.
# 2008-07-01: 14% slower than the default.
set -e
no_clean=0
testsuite_only=0
hpc=NO
slow=NO
while [ $# -gt 0 ]
do
case "$1" in
--no-clean)
no_clean=1
;;
--testsuite-only)
testsuite_only=1
;;
--hpc)
hpc=YES
;;
--slow)
slow=YES
;;
--fast)
slow=NO
;;
*)
echo "Bad argument: $1" >&2
exit 1;;
esac
shift
done
if [ "$THREADS" = "" ]; then
if [ "$CPUS" = "" ]; then
threads=2
else
threads=$(($CPUS + 1)) # `expr $CPUS + 1`
fi
else
threads="$THREADS"
fi
if type gmake > /dev/null 2> /dev/null
then
make="gmake"
else
make="make"
fi
if [ $testsuite_only -eq 0 ]; then
if [ $no_clean -eq 0 ]; then
$make maintainer-clean NO_CLEAN_GMP=YES
INSTDIR=`pwd`/inst
if [ "$OSTYPE" = "cygwin" ]
then
INSTDIR=`cygpath -m "$INSTDIR"`
fi
/usr/bin/perl -w boot --required-tag=dph
./configure --prefix="$INSTDIR" $config_args
fi
thisdir=`utils/ghc-pwd/dist-boot/ghc-pwd`
echo "Validating=YES" > mk/are-validating.mk
$make -j$threads ValidateHpc=$hpc ValidateSlow=$slow
$make binary-dist-prep
$make test_bindist TEST_PREP=YES
fi # testsuite-only
if [ "$hpc" = YES ]
then
# XXX With threads we'd need to give a different tix file to each thread
# and then sum them up at the end
threads=1
HPCTIXFILE=$thisdir/testsuite/hpc_output/ghc.tix
export HPCTIXFILE
rm -f $HPCTIXFILE
fi
if [ "$slow" = YES ]
then
MAKE_TEST_TARGET=fulltest
else
MAKE_TEST_TARGET=test
fi
$make $MAKE_TEST_TARGET stage=2 BINDIST=YES THREADS=$threads 2>&1 | tee testlog
if [ "$hpc" = YES ]
then
utils/hpc/hpc markup --hpcdir=. --srcdir=compiler --srcdir=testsuite/hpc_output --destdir=testsuite/hpc_output testsuite/hpc_output/ghc.tix
fi
echo "-------------------------------------------------------------------"
if
grep '\<0 caused framework failures' testlog >/dev/null 2>/dev/null &&
grep '\<0 unexpected passes' testlog >/dev/null 2>/dev/null &&
grep '\<0 unexpected failures' testlog >/dev/null 2>/dev/null ; then
if [ $testsuite_only -eq 0 ] && [ $no_clean -eq 0 ]
then
cat <<EOF
Congratulations! This tree has passed minimal testing.
NOTE: If you have made changes that may cause failures not tested for by
the minimal testing procedure, please do further testing as necessary.
When you are satisfied that you haven't broken anything, go ahead and
push/send your patches.
EOF
if grep -q "^[^#]" mk/validate.mk
then
cat <<EOF
WARNING: You seem to have things set in mk/validate.mk. Please check
that it is OK before pushing.
EOF
fi
cat <<EOF
-------------------------------------------------------------------
EOF
else
cat <<EOF
I didn't find any problems, but this wasn't a complete validate run,
so be careful!
NOTE: If you have made changes that may cause failures not tested for by
the minimal testing procedure, please do further testing as necessary.
-------------------------------------------------------------------
EOF
fi
else
cat <<EOF
Oops! Looks like you have some unexpected test results or framework failures.
Please fix them before pushing/sending patches.
-------------------------------------------------------------------
EOF
exit 1
fi
Jump to Line
Something went wrong with that request. Please try again.