diff options
Diffstat (limited to 'tap/tests/plan/too-many-plans/test.t')
-rw-r--r-- | tap/tests/plan/too-many-plans/test.t | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/tap/tests/plan/too-many-plans/test.t b/tap/tests/plan/too-many-plans/test.t new file mode 100644 index 00000000..cd2acf74 --- /dev/null +++ b/tap/tests/plan/too-many-plans/test.t | |||
@@ -0,0 +1,29 @@ | |||
1 | #!/bin/sh | ||
2 | |||
3 | cd `dirname $0` | ||
4 | |||
5 | echo '1..2' | ||
6 | |||
7 | make 2>&1 > /dev/null | ||
8 | |||
9 | perl ./test.pl 2>&1 | sed -e 's/twice!.*$/twice!/' > test.pl.out | ||
10 | perlstatus=$? | ||
11 | |||
12 | ./test 2>&1 | sed -e 's/twice!.*$/twice!/' > test.c.out | ||
13 | cstatus=$? | ||
14 | |||
15 | diff -u test.pl.out test.c.out | ||
16 | |||
17 | if [ $? -eq 0 ]; then | ||
18 | echo 'ok 1 - output is identical' | ||
19 | else | ||
20 | echo 'not ok 1 - output is identical' | ||
21 | fi | ||
22 | |||
23 | if [ $perlstatus -eq $cstatus ]; then | ||
24 | echo 'ok 2 - status code' | ||
25 | else | ||
26 | echo 'not ok 2 - status code' | ||
27 | echo "# perlstatus = $perlstatus" | ||
28 | echo "# cstatus = $cstatus" | ||
29 | fi | ||