diff options
Diffstat (limited to 't/tap-number-wordboundary.sh')
-rwxr-xr-x | t/tap-number-wordboundary.sh | 112 |
1 files changed, 112 insertions, 0 deletions
diff --git a/t/tap-number-wordboundary.sh b/t/tap-number-wordboundary.sh new file mode 100755 index 000000000..7aa2c7f09 --- /dev/null +++ b/t/tap-number-wordboundary.sh @@ -0,0 +1,112 @@ +#! /bin/sh +# Copyright (C) 2011-2012 Free Software Foundation, Inc. +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2, or (at your option) +# any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see <http://www.gnu.org/licenses/>. + +# TAP support: +# - TAP result numbers terminated by a non-whitespace "word boundary" +# character are recognized + +am_parallel_tests=yes +. ./defs || Exit 1 + +. "$am_testauxdir"/tap-setup.sh || fatal_ "sourcing tap-setup.sh" + +cat > all.test <<'END' +1..5 +ok 1: foo1 +not ok 2- foo2 +ok 3@ foo3 # SKIP +not ok 4?&%$ foo4 # TODO +ok 5"`!! foo5 # TODO +END + +$MAKE check >stdout && { cat stdout; Exit 1; } +cat stdout + +count_test_results total=5 pass=1 fail=1 skip=1 xpass=1 xfail=1 error=0 + +$EGREP '^PASS: all\.test 1 ?: foo1$' stdout +$EGREP '^FAIL: all\.test 2 ?- foo2$' stdout +$EGREP '^SKIP: all\.test 3 ?@ foo3 # SKIP$' stdout +$EGREP '^XFAIL: all\.test 4 ?\?&%\$ foo4 # TODO$' stdout +$EGREP '^XPASS: all\.test 5 ?"`!! foo5 # TODO$' stdout + +cat > all.test <<'END' +1..3 +ok 2: quux +not ok 1! +ok 476$ # SKIP +END + +$MAKE check >stdout && { cat stdout; Exit 1; } +cat stdout + +count_test_results total=3 pass=0 fail=0 skip=0 xpass=0 xfail=0 error=3 + +$EGREP '^ERROR: all\.test 2 ?: quux # OUT-OF-ORDER \(expecting 1\)$' stdout +$EGREP '^ERROR: all\.test 1 ?! # OUT-OF-ORDER \(expecting 2\)$' stdout +$EGREP '^ERROR: all\.test 476 ?\$ # OUT-OF-ORDER \(expecting 3\)$' stdout + +cat > punctuation <<'END' +' +" +` +# +$ +! +\ +/ +& +% +( +) +| +^ +~ +? +* ++ +- +, +: +; += +< +> +@ +[ +] +{ +} +\ +END + +# Strip any extra whitespace, for Solaris' wc. +planned=`wc -l <punctuation | tr -d " $tab"` + +echo 1..$planned > all.test +awk '{print "ok " NR $0 }' punctuation >> all.test +# For debugging. +cat all.test +# Sanity check. +grep "^ok 1'$" all.test || framework_failure_ "creating all.test" + +$MAKE check >stdout || { cat stdout; Exit 1; } +cat stdout + +count_test_results total=$planned pass=$planned \ + fail=0 skip=0 xpass=0 xfail=0 error=0 + +: |