#!/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
-if [ -f mk/config.mk ]; then
- make distclean
-fi
+no_clean=0
+testsuite_only=0
+hpc=NO
+slow=NO
-if [ -f mk/build.mk ]; then
- mv mk/build.mk mk/build.mk.bak
+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
-# The default is a "quick" build
-echo BuildFlavour=quick >mk/build.mk
-cat mk/build.mk.sample >>mk/build.mk
-
-# You can override the default validate settings using mk/validate.mk
-# e.g. you could add GhcLibWays=p to test profiling.
-echo '-include $(TOP)/mk/validate.mk' >>mk/build.mk
-
-case $OSTYPE in
- cygwin|msys) config_args=--build=i386-unknown-mingw32
- if [ -f c:/mingw/bin/gcc.exe ]; then
- config_args="$config_args --with-gcc=c:/mingw/bin/gcc"
- fi
- ;;
-esac
-
-if [ "$CPUS" = "" ]; then
- # ToDo: make -j doesn't work in libraries/ on Windows (see #1559)
- case $OSTYPE in
- cygwin|msys) threads=1;;
- *) threads=2;;
- esac
+if type gmake > /dev/null 2> /dev/null
+then
+ make="gmake"
else
- threads=`expr $CPUS + 1`
+ make="make"
fi
-sh boot
-./configure $config_args
+if [ $testsuite_only -eq 0 ]; then
-make -j$threads
+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 --validate --required-tag=dph
+ ./configure --prefix="$INSTDIR" $config_args
+fi
-# ToDo: use THREADS=$threads, see #1558
-make -C testsuite/tests/ghc-regress fast stage=2 CLEANUP=1 2>&1 | tee testlog
+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
+
+#
+# Install the mtl package into the bindist, because it is used by some
+# tests. It isn't essential that we do this (the failing tests will
+# be treated as expected failures), but we get a bit more test
+# coverage, and also verify that we can install a package into the
+# bindist with Cabal.
+#
+bindistdir="bindisttest/install dir"
+cd libraries/mtl
+"$thisdir/$bindistdir/bin/runhaskell" Setup.hs configure --with-ghc="$thisdir/$bindistdir/bin/ghc" --global --builddir=dist-bindist --prefix="$thisdir/$bindistdir"
+"$thisdir/$bindistdir/bin/runhaskell" Setup.hs build --builddir=dist-bindist
+"$thisdir/$bindistdir/bin/runhaskell" Setup.hs install --builddir=dist-bindist
+"$thisdir/$bindistdir/bin/runhaskell" Setup.hs clean --builddir=dist-bindist
+cd $thisdir
+
+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
- echo "-------------------------------------------------------------------"
- echo "Congratulations! This tree is has passed minimal testing."
- echo
- echo "NOTE: If you have made changes that may cause failures not tested"
- echo "for by the minimal testing procedure, please do further testing"
- echo "as necessary."
- echo
- echo "When you are satisfied that you haven't broken anything, go ahead"
- echo "and push/send your patches".
- echo "-------------------------------------------------------------------"
+ 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
- echo "-------------------------------------------------------------------"
- echo "Oops! Looks like you have some unexpected test results or"
- echo "framework failures."
- echo "Please fix them before pushing/sending patches."
- echo "-------------------------------------------------------------------"
+ 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
+
projects / ghc-hetmet.git / blobdiff