hc
2024-12-19 9370bb92b2d16684ee45cf24e879c93c509162da
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
#!/bin/sh
BANNER="----------------------------------------------------------------------------"
TCLSH="tclsh all.tcl -preservecore 3 -verbose bps -tmpdir ./results -outfile test-ippool.result"
 
test_setup() {
        if [ -d ./results ]; then rm -fr ./results; fi
        mkdir ./results
}
 
test_ippool() {
        echo "${BANNER}"
        eval $TCLSH -constraints "ipPool"
}
test_postprocess() {
        echo "${BANNER}"
        (failed=`grep FAILED results/*.result | wc -l`; \
        let failed2=failed/2 ;\
        passed=`grep PASSED results/*.result | wc -l`; \
        echo "TEST SUMMARY: $passed tests PASSED, $failed2 tests FAILED" ;\
        exit $failed2)
}
 
test_setup
test_ippool
test_postprocess