+# 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