diff options
author | Juergen Kahrs <Juergen.Kahrs@googlemail.com> | 2013-05-05 13:11:56 +0200 |
---|---|---|
committer | Juergen Kahrs <Juergen.Kahrs@googlemail.com> | 2013-05-05 13:11:56 +0200 |
commit | f6f37055efd53b08e22001776c6e223de78d7f54 (patch) | |
tree | 6e02ea51417313a8a9411a0fcc13c23f347b5554 /cmake/basictest | |
parent | 6855adcdcb8fd310b298043ace84f0cc9133c517 (diff) | |
download | egawk-f6f37055efd53b08e22001776c6e223de78d7f54.tar.gz egawk-f6f37055efd53b08e22001776c6e223de78d7f54.tar.bz2 egawk-f6f37055efd53b08e22001776c6e223de78d7f54.zip |
All EXT and INET test cases pass now.
Diffstat (limited to 'cmake/basictest')
-rwxr-xr-x | cmake/basictest | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/cmake/basictest b/cmake/basictest index 8652ee76..5c7b7eea 100755 --- a/cmake/basictest +++ b/cmake/basictest @@ -27,6 +27,19 @@ fi # Each test case that cannot be handle in the "standard way" shall # be implemented as a function here. +function regtest() { + echo 'Some of the output from regtest is very system specific, do not' + echo 'be distressed if your output differs from that distributed.' + echo 'Manual inspection is called for.' + AWK=$GAWKEXE ${SRCDIR}/regtest.sh +} + +function inftest() { + echo This test is very machine specific... + $GAWKEXE -f ${SRCDIR}/inftest.awk | sed "s/inf/Inf/g" >_${TESTCASE} + ${COMPARE} ${SRCDIR}/${TESTCASE}.ok _${TESTCASE} && rm -f _${TESTCASE} +} + function getline2() { $GAWKEXE -f ${SRCDIR}/getline2.awk ${SRCDIR}/getline2.awk ${SRCDIR}/getline2.awk >_${TESTCASE} ${COMPARE} ${SRCDIR}/${TESTCASE}.ok _${TESTCASE} && rm -f _${TESTCASE} @@ -158,6 +171,28 @@ function fmtspcl() { fi } +function inetechu() { + echo This test is for establishing UDP connections + $GAWKEXE 'BEGIN {print "" |& "/inet/udp/0/127.0.0.1/9"}' +} + +function inetecht() { + echo This test is for establishing TCP connections + $GAWKEXE 'BEGIN {print "" |& "/inet/tcp/0/127.0.0.1/9"}' +} + +function inetdayu() { + echo This test is for bidirectional UDP transmission + $GAWKEXE 'BEGIN { print "" |& "/inet/udp/0/127.0.0.1/13"; \ + "/inet/udp/0/127.0.0.1/13" |& getline; print $0}' +} + +function inetdayt() { + echo This test is for bidirectional TCP transmission + $GAWKEXE 'BEGIN { print "" |& "/inet/tcp/0/127.0.0.1/13"; \ + "/inet/tcp/0/127.0.0.1/13" |& getline; print $0}' +} + function mpfrexprange() { $GAWKEXE -M -vPREC=53 -f ${SRCDIR}/${TESTCASE}.awk > _${TESTCASE} 2>&1 ${COMPARE} ${SRCDIR}/${TESTCASE}.ok _${TESTCASE} && rm -f _${TESTCASE} |