summaryrefslogtreecommitdiff
path: root/validate
blob: d6f1c15b357cfe14d884053d72163eda95e86035 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
#!/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 [ "$CPUS" = "" ]; then
    threads=2
else
    threads=`expr $CPUS + 1`
fi

if [ $testsuite_only -eq 0 ]; then

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

    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

    sh boot
    ./configure "--prefix=`pwd`/inst" $config_args
fi

thisdir=`utils/pwd/pwd forwardslash`

echo "Validating=YES" > mk/are-validating.mk

make -j$threads ValidateHpc=$hpc ValidateSlow=$slow
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

make -C testsuite/tests/ghc-regress fast stage=2 CLEANUP=1 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
    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
fi
echo "-------------------------------------------------------------------"