validate 3.29 KB
Newer Older
1
2
#!/bin/sh

3
# Flags:
Ian Lynagh's avatar
Ian Lynagh committed
4
5
6
7
#   --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
8
#   --hpc:            build stage2 with -fhpc, and see how much of the
9
10
#                     compiler the test suite covers.
#                     2008-07-01: 63% slower than the default.
11
#                     HTML generated here: testsuite/hpc_output/hpc_index.html
12
13
14
#   --fast:           Default. Opposite to --slow.
#   --slow:           Build stage2 with -DDEBUG.
#                     2008-07-01: 14% slower than the default.
15

16
set -e
17

18
19
no_clean=0
testsuite_only=0
20
21
hpc=NO
slow=NO
22
23
24
25
26
27
28
29
30
31

while [ $# -gt 0 ]
do
    case "$1" in
    --no-clean)
        no_clean=1
        ;;
    --testsuite-only)
        testsuite_only=1
        ;;
32
    --hpc)
33
34
35
36
37
38
39
        hpc=YES
        ;;
    --slow)
        slow=YES
        ;;
    --fast)
        slow=NO
40
        ;;
41
42
43
44
45
46
47
48
49
50
51
    *)
        echo "Bad argument: $1" >&2
        exit 1;;
    esac
    shift
done

if [ $testsuite_only -eq 0 ]; then

if [ $no_clean -eq 0 ] && [ -f mk/config.mk ]; then
    make distclean
52
53
fi

Simon Marlow's avatar
Simon Marlow committed
54
case $OSTYPE in
55
56
57
58
59
60
    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
        ;;
Simon Marlow's avatar
Simon Marlow committed
61
62
63
esac

if [ "$CPUS" = "" ]; then
64
    threads=2
Simon Marlow's avatar
Simon Marlow committed
65
else
66
    threads=`expr $CPUS + 1`
Simon Marlow's avatar
Simon Marlow committed
67
68
fi

69
sh boot
70
./configure "--prefix=`pwd`/inst" $config_args
71

72
73
thisdir=`utils/pwd/pwd forwardslash`

74
make Validating=YES -j$threads ValidateHpc=$hpc ValidateSlow=$slow
75
fi # testsuite-only
76

77
if [ "$hpc" = YES ]
78
79
80
81
82
83
84
85
86
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

87
make Validating=YES -C testsuite/tests/ghc-regress fast stage=2 CLEANUP=1 THREADS=$threads 2>&1 | tee testlog
88

89
if [ "$hpc" = YES ]
90
91
92
93
then
    utils/hpc/hpc markup --hpcdir=. --srcdir=compiler --srcdir=testsuite/hpc_output --destdir=testsuite/hpc_output testsuite/hpc_output/ghc.tix
fi

94
echo "-------------------------------------------------------------------"
95
96
97
98
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
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
    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
    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
119
else
120
121
122
123
    cat <<EOF
Oops!  Looks like you have some unexpected test results or framework failures.
Please fix them before pushing/sending patches.
EOF
124
fi
125
126
echo "-------------------------------------------------------------------"